nicht ganz, weil meiene naheliegende Lösung hier dann einen Abstract Fehler zurückliefert ....
Delphi-Quellcode:
var
IniFile: TCustomIniFile;
if FileExists(filename) then
begin
IniFile := TCustomIniFile.Create(filename);
try
Result := IniFile.ReadString(SectionStr, IdentStr, '<none>');
finally
IniFile.Free;
end;
end
else
begin
Result := '<no file found>';
end;