Was ist hier falsch ?

[Die Muhkuh]

hiho,

probiers mal so:

Delphi-Quellcode:

procedure TForm1.Checkbox1Click(Sender: TObject)
begin
  if Checkbox1.checked then
    begin
      showmessage('OK');
      Form1.Hide;
    end;
end;