CM_MOUSEENTER消息怎么用啊 ( 积分: 100 )

  • 主题发起人 主题发起人 lx8598@126
  • 开始时间 开始时间
L

lx8598@126

Unregistered / Unconfirmed
GUEST, unregistred user!
CM_MOUSEENTER消息怎么用啊
谢谢指教
 
CM_MOUSEENTER消息怎么用啊
谢谢指教
 
procedure CMMouseEnter(var msg:TMessage)
message CM_MOUSEENTER;

procedure TForm1.CMMouseEnter(var msg: TMessage);
begin
...
end;
 
CM_MOUSEENTER是指鼠標移到能獲得焦點對象上時而触發的信息。
 
type
TMyPanel = class(TPanel)
private
procedure CMMouseEnter(var msg:TMessage)
message CM_MOUSEENTER;
public
{ Public declarations }
published
{ Published declarations }
end;
...
procedure TMyPanel.CMMouseEnter(var msg: TMessage);
begin

end;
 
实现部分的具体代码呢?请指教
 
你想实现什么?
 
后退
顶部