weil man nicht direkt auf True und False testen soll? (vorallem nicht auf True ... bei False ist es eher unproblematisch)
(gibt auch schon genügend Threads hier, warum das so ist.)
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
If CheckBox1.Checked = False then
Button1.Enabled := False
Else
Button1.Enabled := True;
end;
aber warum denn so umständlich?
Button.Enabled = Boolean
CheckBox1.Checked = Bollean
CheckBox1.Checked = Bollean = Button.Enabled
CheckBox1.Checked = Button.Enabled
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
Button1.Enabled := CheckBox1.Checked;
end;