Einzelnen Beitrag anzeigen

jbg

Registriert seit: 12. Jun 2002
3.482 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2
  Alt 3. Jan 2003, 21:58
Da musst du wohl den EventHandler kurzzeitig außer Kraft setzen:
Delphi-Quellcode:
procedure SetCheckBoxChecked(CheckBox: TCheckBox; Checked: Boolean);
var OnClick: TNotifyEvent;
begin
  OnClick := CheckBox.OnClick;
  try
    CheckBox.OnClick := nil;
    CheckBox.Checked := Checked;
  finally
    CheckBox.OnClick := OnClick;
  end;
end;
  Mit Zitat antworten Zitat