showmessage('nin_balloontimeout');
nin_balloonuserclick: {当鼠标点击 balloon tips 时执行。注意:在xp下执行时 balloon tips 上有个关闭按钮,而且 balloon tips 一直显示(icondata.dummyunionname.utimeout := 3000; 这句话设定的时间没有用,我的测试是这样的),如果鼠标点在按钮上将接收到 nin_balloontimeout 消息。}
showmessage('nin_balloonuserclick');
end;
end;
好了,代码写完了。我原先还在到处贴贴子问及如何强制显示 systrayicon 的tips,现在看来只要执行 showballoontips (将结构中新的域赋上值,执行nim_modify 动作)就立即显示出来了。不知道自己回答了自己的问题斑竹会不会给分啊。 ^_^
新特性需要 ie5.0 或以上版本,我在 win2000、xp + delphi 6.0下测试通过。手头没有98/me,不知道可不可以。
(完)