ReadBool Ini-File

[Jürgen Thomas]

Zitat von pilic:

Ich entschuldige mich vielmals, dass ich es nicht noch klarer formuliert habe. Aber ich habe nicht grundlos unter mein Posting geschrieben:

Zitat:

Das "c" vor den Zahlen ist übrigens auch im Read-Bereich.

Ich dachte einfach nur, dass es nicht nötig wäre den Bereich noch mal zu posten, nur weil darin 4 "c"s mehr vorkommen.

Sorry, das hatte ich nicht so verstanden.

In Deinem Quelltext scheint eigentlich nichts falsch zu sein. Mir fällt aber Folgendes auf:

Zitat von pilic:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  //  usw.
  Form1.Close;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
  ini := TIniFile.create(IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))) + 'settings.ini');
  try
    ini.WriteBool('myOne','c1',Checkbox1.Checked);
    ini.WriteBool('myOne','c2',Checkbox2.Checked);
    ini.WriteBool('myOne','c3',Checkbox3.Checked);
    ini.WriteBool('myOne','c4',Checkbox4.Checked);
  finally
    ini.free;
  end;
end;

Durch Button1Click wird sofort das Formular geschlossen. Der Status wird also nur dann in die Ini-Datei geschrieben, wenn manuell Button2 gedrückt wird.

Vorschlag: Der Code für Button2Click wird in das Ereignis OnClose verschoben.

War's denn das? Jürgen