connection zum Server

[claudine99]

Hab ich schon vorher entfernt. Ich baue die Connection ja erst auf, wenn gestetet wurde, ob es ein ini gibt. So sollte es jedenfalls sein
Leider immer das selbe Ergebnis.

[Jumpy]

Nur mal doof gefragt. Was steht denn in der variablen IP?
Sicher das der Zugriff auf die INI funzt?

[claudine99]

wenn ich das Codebeispiel bei 'beforeConnect' hineinschreibe bekomme ich eine Fehlermeldung: EStackoverflow mit der Meldung 'Stack-Überlauf'

[Furtbichler]

Du schreibst im BeforeConnect' natürlich nicht 'MyConnection.Open;' rein. Denn dann wird ja 'BeforeConnect' aufgerufen (schätze ich).

Aber Du hast einen Wurm in deiner SW, wenn Du nicht mal weißt, wo die Verbindung aktiviert wird.

[claudine99]

so wird die ini ausgelesen:

////////////ini auslesen

function GetIPfromINI(cFile:string):string;
var
ini: TIniFile;
filename: String;
begin
Result:='';
filename := ExtractFilePath(ParamStr(0)) + cFile;
ini := TIniFile.Create(filename);
try
Result := ini.ReadString('connection', 'IP', '12.345.678.910');
finally
ini.Free;
end;
end;
////////////////////////////////////


die ini heißt auch richtig und steht im gleichen Ordner wie die .exe.
Wäre super, sollte jemand noch eine Idee haben.

[claudine99]

Den Wurm suche ich ja grad
Vorher hatte ich den Aufbau der Connection bei 'on create'. Trotzdem wurde zuerst versucht, sich mit der 12.345.678.910 zu verbinden und daach mit der IP aus der ini. Da die Kollegen, welche die ini nutze, icht auf die andere IP kommen, erhalten sie dann immer die Fehlermeldug der fehlenden Connection.

[Perlsau]

Zitat von claudine99:

so wird die ini ausgelesen:

 Result := ini.ReadString('connection', 'IP', '12.345.678.910');

Schau doch einmal nach, ob nicht hier bereits der Default-Wert als Result zurückgeliefert wird. Womöglich existiert dein Schlüssel nicht oder es ist ihm kein Datenwert zugeordnet.

Auszug aus der Hilfe:

ReadString liest einen String-Wert aus einer INI-Datei.
Der String Section bezeichnet den Abschnitt, der den zum Wert gehörigen Schlüssel enthält.
Der String Ident ist der Name des Schlüssels mit dem Wert.
Default ist der Standardwert, der in den folgenden Situationen zurückgeliefert wird:

1. Der Abschnitt ist nicht vorhanden.
2. Der Schlüssel existiert nicht.
3. Dem Schlüssel ist kein Datenwert zugeordnet.

[Sir Rufo]

@Perlsau



@claudine99

Setze dir einen Haltepunkt auf das Ende der Funktion und schau, welchen Wert Result dort bekommt.

BTW: Es macht sich immer gut in ein Programm eine Log-Funktion einzubauen, dadurch sieht man, was dort wirklich passiert, gerade wenn das beim Anwender in Aktion ist.

[Furtbichler]

Zitat von Perlsau:

Schau doch einmal nach, ob nicht hier bereits der Default-Wert als Result zurückgeliefert wird.

Dann würde folgendes nicht passieren:

Zitat von claudine99:

Trotzdem wurde zuerst versucht, sich mit der 12.345.678.910 zu verbinden und danach mit der IP aus der ini...

Wann wird denn zum 1.Mal connected (mit der falschen IP)?

[Perlsau]

Zitat von Furtbichler:

Zitat von Perlsau:

Schau doch einmal nach, ob nicht hier bereits der Default-Wert als Result zurückgeliefert wird.

Dann würde folgendes nicht passieren:

Zitat von claudine99:

Trotzdem wurde zuerst versucht, sich mit der 12.345.678.910 zu verbinden und danach mit der IP aus der ini...

Die IP, die in der ersten Connect-Zeile steht, ist zweifellos diejenige IP, die von der Function GetIPfromINI(cFile:string):string; zurückgeliefert wird.

Delphi-Quellcode:

  IP := GetIPfromINI('NAT_IP.ini'); // ZUWEISUNG AUS DER FUNCTION AN IP
  DM.AdoConnection1.CLOSE;
  DM.ADOCon__DWH.Close;
  try
     Memo1.Lines.Append('try connect to IP: ' + IP);
     Memo1.Lines.Append('');
     DM.AdoConnection1.ConnectionString := Format(ConnString,[UserName, PassWord, IP]); // ÜBERNAHME DES STRINGS AUS IP
     DM.AdoConnection1.Open;

Weshalb also sollte es nicht passieren können, daß zuerst mit der Default-IP verbunden wird? Denn schließlich wird in Result := ini.ReadString('connection', 'IP', '12.345.678.910'); genau diese Default-IP angegeben, falls eine der Fehlerbedingungen von TIniFile.ReadString zutrifft. Und genau diese Fehlerbedingung könnte eintreffen, ja ist sogar sehr wahrscheinlich, denn sonst stünde in der Variablen IP ja eine andere IP-Adresse als der Defaultwert.