Thema: Delphi ReadBool Ini-File

Einzelnen Beitrag anzeigen

Jürgen Thomas

Registriert seit: 13. Jul 2006
Ort: Berlin
750 Beiträge
 
#23

Re: ReadBool Ini-File

  Alt 15. Aug 2006, 14:10
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
#D mit C# für NET, dazu Firebird
früher: Delphi 5 Pro, Delphi 2005 Pro mit C# (also NET 1.1)
Bitte nicht sauer sein, wenn ich mich bei Delphi-Schreibweisen verhaue; ich bin inzwischen an C# gewöhnt.
  Mit Zitat antworten Zitat