----- Original Message ----- From: "Alistair George" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Friday, June 11, 2004 9:10 AM Subject: [DUG] Control properties mouseenter mouseleave not working (my modifiedcontrol)
> Here we go again............ > Why cant I get the following mouseenter mouseleave to work? Is it an inheritance > problem please? Have a look at MdActiveBtn on this page: http://www.marcocantu.com/code/md6htm/Mdpack.htm for an example of creating mouseenter and mouseleave events by catching the Windows messages. > unit BlinkLbl; > [...] > procedure MouseEnter; > procedure MouseLeave; Make these: procedure MouseEnter (var Msg: TMessage); message cm_mouseEnter; procedure MouseLeave (var Msg: TMessage); message cm_mouseLeave; Regards, Brian _______________________________________________ Delphi mailing list [EMAIL PROTECTED] http://ns3.123.co.nz/mailman/listinfo/delphi
