如何实现自动隐藏状态栏(100分)

  • 主题发起人 主题发起人 topza
  • 开始时间 开始时间
T

topza

Unregistered / Unconfirmed
GUEST, unregistred user!
如何实现自动隐藏状态栏
 
用两个消息就搞定了,鼠标进入和离开时设置状态栏的visable
 
我要求达到WINDOWS中设置的自动隐藏状态栏的效果,是为了我一个全屏的程序服务的!<br>请写出具体程序!
 
照你的意思好像这样就可以了<br><br>procedure hidetaskbar;<br>var <br>&nbsp; wndhandle:thandle;<br>&nbsp; wndclass:array[0..50] of char;<br>begin<br>&nbsp; strpcopy(@wndclass[0],'shell_traywnd');<br>&nbsp; wndhandle:=findwindow(@wndclass[0],nil);<br>&nbsp; showwindow(wndhandle,sw_hide); &nbsp;//恢复用sw_restore<br>end;
 
我有控件,来信.<br>forevertyn@sina.com
 
被FU_XIANG_YU抢先啦,唉!对啦,像他那种方法可以的,我试过的。 &nbsp;=:(
 
同志们,你们说的我知道,但是那是强行隐藏,我的要求是自己隐藏功能,像WINDOWS本身<br>的功能一样。有控件的朋友是不是可以帮我发一个过来,topzhouan@sina.com,谢谢!
 
那也容易啊,截个鼠标消息不就行了?<br>如果鼠标移动出任务栏区域外,就执行上面的程序隐藏<br><br>如果鼠标又移到任务栏区域内,就显示。<br><br>这样总该行了吧<br><br><br>
 
其实LanFairy先前就说对了<br><br>
 
这位兄弟好像想要学瘟到死的“慢慢弹出“的效果吧。:(<br>用LANFAIRY的方法吧。效果的话。。。。<br>嗯,用画布吧。天,太高K啦。<br>
 
渐入渐出用tformcontainer控件组吧,有demo<br><br>肯定能满足你的要求了<br><br>BTW:大家怎么都喜欢玩花的?
 
鼠标移入移出是否可以帮我写出具体程序,如何写,写在什么地方,请指教!
 
/Borland/Delphi5/Demos/AppEvents<br>看看这个就明白了
 
接受答案了.
 
后退
顶部