导航
  • 主页
  • 招聘
  • 语言基础/算法/系统设计
  • 数据库相关
  • 图形处理/多媒体
  • 网络通信/分布式开发
  • VCL组件开发及应用
  • Windows SDK/API
  • 问答

弹出菜单问题!

编程小战 2002-11-29 03:56:52
我将程序最小化成系统图标,右击图标弹出菜单。奇怪的是如果窗口最小化,弹出菜单后如
果不选菜单项的话,再点击桌面空白处,菜单不会自已消失,但是如果窗口没有最小化就是
正常的,请问这是为什么?
可参你们的系统图标区,比如金山词霸,音量控制什么的,在没有可视窗口的情况下也不会
出现上述的弹出菜单问题!
...全文
8 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
编程小战 2002-12-01
SetForegroundWindow(form1.handle); //加上这一行就行了
加上这行后,窗口不最小化时,点击桌面空白处,菜单不会关闭,但窗口最
小化时是正常的,怎么回事?
回复
smilelhh 2002-11-29
if (message.lParam = WM_RBUTTONDOWN) then
begin
GetCursorPos(p);
SetForegroundWindow(form1.handle); //加上这一行就行了
popupmenu1.Popup( p.x ,p.y );
end;
回复
发动态
发帖子
Delphi
创建于2007-08-02

4802

社区成员

Delphi 开发及应用
申请成为版主
社区公告
暂无公告