Einzelnen Beitrag anzeigen

Benutzerbild von x000x
x000x

Registriert seit: 21. Jan 2004
Ort: Bei Hamburg
308 Beiträge
 
Delphi XE2 Professional
 
#8

Re: TIniFile: "ReadSections" funktioniert nicht

  Alt 3. Aug 2005, 21:25
Zitat von Pseudemys Nelsoni:
...wird die aus dem Programmpfad benutzt.
und weil sie eben nicht aus dem Programmpfad benutzt wird, bekommst du auch nur eine Leere Stringliste.
Gebe bei deinem geposteten code den vollen Pfad zu deiner servers.ini an, bzw. kopiere sie
in dein Windowsverzeichnis und du wirst sehen, dass dir die sections alle angezeigt werden.

Delphi-Quellcode:
ServerGroups := TStringList.Create;
Ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'servers.ini');
try
  ini.ReadSections(ServerGroups);
  Showmessage(IntToStr(ServerGroups.Count));
finally
  Ini.Free;
  ServerGroups.Free;
end;
Peter
-= Gruss Peter =-
-= alias x000x =-
  Mit Zitat antworten Zitat