Registriert seit: 13. Okt 2010
Ort: Bayern
490 Beiträge
Delphi 10.4 Sydney
|
AW: checkbox change ohne click
10. Mai 2011, 08:10
Delphi-Quellcode:
var
lfOldOnClick: TNotifyEvent;
begin
lfOldOnClick := chkBox.OnClick;
chkBox.OnClick := nil;
...
MachWasGanzGefinkeltes();
...
chkBox.OnClick := lfOldOnClick;
end;
Ungetestet in die Tastatur gehämmert.
Oder guckst Du hier.
Delphi-Quellcode:
{set a checked}
yourCheckBox.Perform(BM_SETCHECK, 1, 0);
{set a unchecked}
yourCheckBox.Perform(BM_SETCHECK, 0, 0);
Nr.1 Delphi-Tool: [F7]
|