Du kannst das create auch innerhalb des try-Blocks lassen und Ini for dem try-Block erstmal mit nil initialisieren ! Ich war zwar auch ein wenig überrascht, aber genau dadurch hatte ich gerade gestern einige schwerwiegende Fehler in meinem Programm !
So wie Du es ursprünglich hattest, würde es zu einem Fehler kommen, wenn es beim create zu einer
Exception kommt und free dann für das nicht initialisierte ini aufgerufen würde. Hast Du ini aber vorher mit nil belegt, geht alles glatt !
Ich würde es so machen:
Delphi-Quellcode:
procedure TRefresh.Execute;
begin
try
Ini := nil;
try
fehler := sfehler;
Ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'Wechselkurse.ini');
finally
Ini.Free;
end;
except
end;
end;
Gruß
Daniel