Hi.
Zitat von
Knotti2005:
Komisch speichern geht nur laden nicht...
Delphi-Quellcode:
procedure TForm2.FormCreate(Sender: TObject);
var d :string;
begin
ini := Tinifile.Create(ExtractFilePath(Application.Exename) + 'Einstellungen.dat');
ini.ReadString('tapi', 'aktiviert', d);
if d = 'yes' then form1.CheckBox2.Checked := true;
if d = 'false' then form1.CheckBox2.Checked := false;
ini.Free;
Wie Marabu schon sagte... ReadString ist eine Funktion
.
Code:
-> Wert := ReadString(Abschnitt, Schlüssel, [size=18][b]Standardwert[/b][/size]) <-
Du nimmst also
d als Standardwert und verwirfst das Ergebnis
PS: Gute Nacht!
*ratzepüh*