先感谢这位SUCCESSLIKUN,
然后谢谢哪位可以帮忙解释一下以下的代码???以下的LPARAM和WPARAM是什么意思?
procedure TForm1.icontray(var msg: tmessage);
var
pt:Tpoint;
begin
if msg.LParam=wm_lbuttondown then
..........
if msg.WParam=wm_rbuttondown then
begin
getcursorpos(pt);
setforegroundwindow(handle);
popupmenu1.Popup(pt.x,pt.y);
end;
end;