J
JWXLI
Unregistered / Unconfirmed
GUEST, unregistred user!
发送一个自定义消息,这个消息函数进行了如下处理,但我想不通的是,WM_LBUTTONDBLCLK,
WM_RBUTTONDOWN:都应属于消息常量部分的值,但是现在它为什么会是消息的附加lparam部分的值呢?请指点。
procedure TForm1.wmuser(var message: Tmessage);
var
pt:tpoint;
begin
case Message.lparam of
WM_LBUTTONDBLCLK:
begin
form1.Visible :=true;
Shell_NotifyIcon(Nim_Delete,@tid);
end;
WM_RBUTTONDOWN:
begin
GetCursorPos (pt);
SetForegroundWindow (form1.handle);
PopupMenu1.Popup(pt.x,pt.y);
end;
end;
end;
WM_RBUTTONDOWN:都应属于消息常量部分的值,但是现在它为什么会是消息的附加lparam部分的值呢?请指点。
procedure TForm1.wmuser(var message: Tmessage);
var
pt:tpoint;
begin
case Message.lparam of
WM_LBUTTONDBLCLK:
begin
form1.Visible :=true;
Shell_NotifyIcon(Nim_Delete,@tid);
end;
WM_RBUTTONDOWN:
begin
GetCursorPos (pt);
SetForegroundWindow (form1.handle);
PopupMenu1.Popup(pt.x,pt.y);
end;
end;
end;