Tatsächlich, hmm kommt davon wenn man nie damit arbeitet...
So geht es immerhin.
Delphi-Quellcode:
procedure TAboutBox.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked = True then
begin
ShowMessage('Ein');
end
else if CheckBox1.Checked = False then
begin
ShowMessage('Aus');
end;
end;
Wobei es schöner wäre, wenn die IFs nicht bräuchte, aber na gut.
Trotzdem Danke, hat mir sehr geholfen.
Grüsse, Daniel
