Registriert seit: 8. Nov 2006
1.360 Beiträge
Delphi 10.3 Rio
|
Speichern in INI geht net
21. Dez 2007, 19:53
Hi habe mal wieder ein problem mit meiner Inidatei
das Speichern meines True'S geht net mehr warum
kann mir einer vielleicht helfen???
Delphi-Quellcode:
procedure TForm5.CheckBox1Click(Sender: TObject);
begin
INIDocPfad:= Form1.Serverpfad + 'Einstellungen\DocSettings.ini';
if CheckBox1.Checked = True then
begin
Panel3.Color:= CLLime;
with TMemIniFile.Create(INIDocPfad) do
try
WriteBool(DokumentEinstellung,Anzeigen1,True); // Wert in die ini datei schreiben
WriteString(DokumentEinstellung, PanelFarbeEinAus, (ColorToString(Panel3.Color))); // farbe Speichern
WriteString(DokumentEinstellung,PanelText, ('Dokumentenanzeige Ein'));
finally
Free
end;
If CheckBox1.Checked = False then
Begin
Panel3.Color:= CLRed;
with TMemIniFile.Create(INIDocPfad) do
try
WriteBool(DokumentEinstellung,Anzeigen1,False); // Wert in die ini datei schreiben
WriteString(DokumentEinstellung, PanelFarbeEinAus, (ColorToString(Panel3.Color))); // farbe Speichern
WriteString(DokumentEinstellung,PanelText, ('Dokumentenanzeige AUS'));
UpdateFile;
finally
Free;
Button3.Click; //Timer stoppen
end;
End;
end;
end;
Gruss Sascha
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...
Surft Ihr mit dem Taschenrechner?"
|