Ini Problem, wo liegt der Fehler?

[FileOwner]

Wo liegt der Fehler ich sitz schon seit ner Stunde drann und komm nich weiter

Delphi-Quellcode:

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
var ini: TIniFile;
begin
 ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+
    'server.ini');

    ini.WriteString('Connection','ServerIP',Form2.ClientSocket1.Host);
    ini.WriteString('Connection','Port',inttostr(Form2.ClientSocket1.Port));
    ini.WriteString('User','Nickname',Nickname);
    ini.Free;
end;

procedure TForm2.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('server.ini');
  try
  clientsocket1.Host:=ini.Readstring('Connection','ServerIP', '');
  Nickname:=ini.Readstring('User','Nickname', '');
  clientsocket1.Port:=ini.ReadInteger('Connection','Port',0);
  finally
    ini.free;
    sleep(450);
    Timer4.Enabled := true;
end;

INIFILE:

[Connection]
ServerIP=192.168.0.133
Port=99
[User]
Nickname=Oo



Bitte helft mir

[DeddyH]

Außer, dass evtl. 2 verschiedene Pfade (und keine try-finally-Blöcke) benutzt werden, fällt mir nichts auf.

[mkinzler]

Was geht nicht, das Erzeugen oder das Einladen?

[Matze]

Hallo,

was funktioniert denn nicht?

Du solltets übrigens generell absolute Pfaden nutzen, da das Arbeitsverzeichnis nicht zwangsläufig dein Programmverzeichnis ist. Relative und absolute Pfade zu mischen ist sowieso nicht sinnvoll.

Edit: Mist, Deddy ist heute verdammt schnell. *g*

[toms]

Hallo, vielleicht greifst du nicht auf dieselbe Ini zu.
Im Create(...) schreibst du einmal den vollen Pfad und einmal nicht.

[DeddyH]

[OT] Matze, ich bin auch ganz erstaunt :D [/OT]

[bigben37]

Zitat:

Delphi-Quellcode:

 clientsocket1.Port:=ini.ReadInteger('Connection','Port',0);

Kann es sein, dass es

Delphi-Quellcode:

clientsocket1.Port:=StrToInt(ini.ReadString('Connection', 'Port',''));

heißen muss, da du es auch als String speicherst?

[DeddyH]

Hallo bigben, das ist reine Interpretationssache, in einer Ini stehen immer Strings.

[Die Muhkuh]

Nach dem finally-Block fehlt noch ein end.

@bigben:
Biberach (Baden) oder Biberach an der Riß?

[mkinzler]

Oder (HN-)Biberach (Württemberg)