Das geht auch einfacher
:
Delphi-Quellcode:
procedure SaveToIni;
var
Ini: TIniFile;
begin
Ini := TIniFile.Create(ExtractFilePath(Application.Exename)+'Einstellungen.dat');
try
Ini.WriteBool('TAPI', 'Aktiviert', CheckBoxXYZ.Checked);
finally
Ini.Free;
end;
end;
Am besten packst Du das ganze in einen try-finally-Block, damit die Ini auf jeden Fall freigegeben wird, auch wenn beim Schreiben in die Datei ein Fehler auftritt.
MfG