Irgendwie bin ich zu blöde
Delphi-Quellcode:
//--------------------------------------------------------------- | Speichern und laden
PROCEDURE TForm2.FormCreate(Sender: TObject);
VAR ini: Tinifile;
BEGIN
ini := TIniFile.Create('C:\ftp4u.ini');
Form2.CBBeendenfrage.Checked := ini.ReadBool('Abfragebeiende', 'Abfrage', false);
ini.Free;
END;
PROCEDURE TForm2.BTspeichernClick(Sender: TObject);
VAR ini: TInifile;
BEGIN
ini := TIniFile.Create('C:\ftp4u.ini');
ini.WriteBool('Abfragebeiende', 'Abfrage', false);
ini.Free;
END;