Wert einer Checkbox ändern, ohne OnClick Handler auszulösen

[Lannes]

Hallo,

spricht eigentlich etwas dagegen OnClick in folgender Form zu umgehen?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  CheckBox1.onClick := nil;
  checkbox1.Checked := not checkbox1.Checked;
  CheckBox1.onClick := CheckBox1Click;
end;