Hallo Zusammen,
ich bekommes es einfach nicht hin, ein INI File zu lesen.
Mein Programm nutzt CoolTrayIcon und im Zusammenhang mit Create
für TIniFile kommt es so fort zum bekannten Fehler das das Parent fehlt.
Habe ja alles hier dazu im Forum gefunden. Dank der Suche.
Aber TInifile hat kein parent. Undefinierter Bezeichner.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
CoolTrayIcon1.IconVisible := True;
try
Ini:=TIniFile.Create(ExtractFilePath(ParamStr(0)) + '
hstray.ini');
ini.parent := Selft; <----- GEHT NICHT :-(
tcpclient.Host := ini.readstring('
Homeserver','
IP','
0.0.0.0');
tcpclient.Port := ini.readinteger('
Homeserver','
Port',0);
finally
Free;
end;
HSIP.Text := tcpclient.Host;
HSPORT.Text := InttoStr(tcpclient.Port);
end;
Ohne CoolTrayIcon läuft der Ini Kram und auch umgekehrt - aber zummen nicht.
Habe ich da was übersehen?
Für ein Tip wäre ich Dankbar
Gruß
Hiele
EDIT:
Manchmal sieht man den Wald vor lauter Bäumen nicht!!
Das kommt vom Kopieren
Hatte vergessen:
ini.free;
Danke fürs zuhören
