Registriert seit: 24. Okt 2004
1.542 Beiträge
Delphi XE Architect
|
Re: INIFile.ReadSections führt zum Abstrakten Fehler
16. Okt 2007, 13:05
ne ob Applictation.ExeName oder Paramstr(0) ist egal da es des genau gleich ist.
Teste des einmal so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
MyIni : TIniFile;
MySections : TStringList;
I: Integer;
begin
MySections := TStringList.Create;
MyIni := TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini'));
MyIni.ReadSections(MySections); // <-- Hier knallts !!
for I := 0 to MySections.count - 1 do
begin
ShowMessage(MySections.Items[i]);
end;
MySections.Free;
MyIni.Free;
end;
wenns nicht geht test mal ob MyIni.ReadString(irgendwas, ..) geht
Alex "Sage nicht alles, was du weißt, aber wisse alles, was du sagst!" Matthias Claudius
"Wer sich über Kritik ärgert, gibt zu, daß er sie verdient hat." Tacitus
|