"Ungültige Zeigeroperation" beim Ändern des CheckBox-Status

[Sharky]

Hai Tyler,

es wundert mich das Du den Code überhaupt Comilier kannst. TCheckBox.State := cbUnCheked meldet mir sofort der Compiler als Fehler.
Auf jeden fall geht es bei mir so ohne Probleme:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  ini : TIniFile;
  s : Integer;
begin
  ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'init.ini');
  try
    ed_Pfad.Text := ini.ReadString('SAVE', 'Quelle', 'Pfad zur Quelldatenbank');
    ed_Ziel.Text := ini.ReadString('SAVE', 'Ziel', 'Name der Zieldatenbank auf dem MySQL-Server');
    s := ini.ReadInteger ('SAVE', 'Autostart', 0);
    cb_autostart.Checked := s = 1;
    s := ini.ReadInteger ('SAVE', 'DeleteZiel', 0);
    cb_DelZiel.Checked := s = 1;
  finally
   ini.Free;
  end;
end;