[CheckBox] True / False aus .ini lesen und verwenden.

[xShadowBoZz]

so ich bins ma wieder

hab hier ma ne frage und zwar:
also bei einer checkbox ist ja checked=True glaub also zahl(boolean, in .ini file) gleich '0'.
ich hab folgendes gemacht:

Form1 is hauptfenster, da gibts ein 'Settings' button, da öffnet sich dann Form2. Da klick ich dann auf die checkbox.
so jetzt klick ich auf speichern, des wird dann in der .ini file gespeichert, aba wenn ich das prog wieder öffne is das nicht gespeichert bzw. es wird net so verwendet das die Checkbox angetickt ist(=True).

vielt. erklärt des alles ein bisschen besser:

also erstmal die checkbox:

Delphi-Quellcode:

procedure TForm2.CheckBox1Click(Sender: TObject);
begin
If Checkbox1.Checked then
  Form1.Edit2.PasswordChar := '*'
    else
      Form1.Edit2.PasswordChar := #0;
end;

dann klick ich auf speichern/save.

Delphi-Quellcode:

procedure TForm2.Button2Click(Sender: TObject);
var
  Ini: TIniFile;
begin
  try
    Ini:=TIniFile.Create('D:\Save.ini');
    Ini.WriteString('KnownAccount','KnownID',edit1.Text);
    Ini.WriteString('KnownAccount','KnownPW',edit2.Text);
    Ini.WriteString('KnownAccount','KnownPIN',edit3.Text);
    Ini.WriteString('CrackingAccount','CrackingID',edit4.Text);
    Ini.WriteString('CrackingAccount','CrackingPW',edit5.Text);
    Ini.WriteString('CrackingAccount','CrackingPINstart',edit6.Text);
    Ini.WriteString('CrackingAccount','CrackingPINstop',edit7.Text);
    Ini.WriteBool('Other','CensoredPW',CheckBox1.Checked); // ist ja logisch, der liest dann ob True 
    Ini.WriteBool('Other','CensoredPW',CheckBox2.Checked); // oder False aus Checked
  finally
    Ini.Free;
end;
end;

dann schlies ich alles und wenn ich dann gucke dann sollte des ja angetickt sein aba ich weis net genau wie er das lesen soll, habs jetzt so gemacht, aba das funktioniert net.

Delphi-Quellcode:

procedure TForm2.FormShow(Sender: TObject);
var  Ini: TIniFile;
begin
  try
    Ini:=TIniFile.Create('D:\Save.ini');
    Edit1.Text:=Ini.ReadString('KnownAccount',
                      'KnownID','kein Wert');
    Edit2.Text:=Ini.ReadString('KnownAccount',
                      'KnownPW','kein Wert');
    Edit3.Text:=Ini.ReadString('KnownAccount',
                      'KnownPIN','kein Wert');
    Edit4.Text:=Ini.ReadString('CrackingAccount',
                      'CrackingID','kein Wert');
    Edit5.Text:=Ini.ReadString('CrackingAccount',
                      'CrackingPW','kein Wert');
    Edit6.Text:=Ini.ReadString('CrackingAccount',
                      'CrackingPINstart','kein Wert');
    Edit7.Text:=Ini.ReadString('CrackingAccount',
                      'CrackingPINstop','kein Wert');
    Label23.Caption:=Ini.ReadString('GGLess Info',
                      'GGLess Path','kein Wert');
    Label25.Caption:=Ini.ReadString('GGLess Info',
                      'GGLess Name','kein Wert');
    CheckBox1.Checked:=Ini.ReadBool('Other',
                      'CensoredPW',False); // hier weis ich net was ich angeben soll damit ers automatisch liest.
  finally
    Ini.Free;
end;
end;

hoffe das jemand helfen kann, thx im vorraus.

mfg
andy