shell contextmenu中显示一个form(50分)

  • 主题发起人 主题发起人 ibear
  • 开始时间 开始时间
I

ibear

Unregistered / Unconfirmed
GUEST, unregistred user!
[:(]<br>在做一个shell contextmenu,想在执行弹出一个form,但直接显示一个Form的话在任务栏上有个按钮,又不想用WS_EXT_TOOLSWINDOW风格,变窄的标题栏很难看,不知如何搞定<br>
 
在Main Form的OnShow中,添加如下代码即可:<br>&nbsp; ShowWindow(Application.Handle,SW_HIDE)<br><br>此后,必须处理最小化消息:<br>private <br>&nbsp; procedure WMSysCommand(var msg: TWMSysCommand); message WM_SysCommand; <br><br>{....} <br><br>implementation <br><br>procedure TMainForm.WMSysCommand(var msg: TWMSysCommand); <br>begin <br>&nbsp; if msg.CmdType and $FFF0 = SC_MINIMIZE then <br>&nbsp; &nbsp; hide <br>&nbsp; else <br>&nbsp; &nbsp; inherited; <br>end; <br>这样可以不在任备栏中出现按钮,试试看???
 
老弟!我这是在shell extension中,那来的application
 
楼上的回答是可以的,虽然是一个Shell程序,也应该是可以的
 
后退
顶部