procedure CheckNoClick( const aCB: TCheckBox; const aCheckIt:Boolean);
begin
    if aCheckIt then begin
        SendMessage(aCB.handle, BM_SETCHECK, Ord(aCheckIt),0);
        aCB.State:=cbChecked;
    end
    else begin
        SendMessage(aCB.handle, BM_SETCHECK, Ord(aCheckIt),0);
        aCB.State:=cbUnChecked;
    end
end;
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Paul Mckenzie
Sent: Monday, 11 November 2002 12:29 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Check-boxes

Anyone know how to Set/Unset a check-box without its Click event being triggered...
Changing "Checked", or "Status" seemd to call the onClick.
 
I can do it by creating a new type of check-box - but is there an easy way ?
 
 
Regards
Paul McKenzie
Analyst Programmer
SMSS ltd.
 

Reply via email to