Button1.Enable

[himitsu]

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;