(紧急)请问各位高手,怎样实现像OICQ那样程序窗体可以缩到屏幕顶端。(我想做一个聊天器) (100分)

  • 主题发起人 xtyygyiwf520
  • 开始时间
X

xtyygyiwf520

Unregistered / Unconfirmed
GUEST, unregistred user!
请问各位高手,怎样实现像OICQ那样,当鼠标移开窗体时,窗体可以缩到屏幕顶端。并且当点击屏幕其它地方时
在任务栏上不显示小图标(想做一个聊天器)
请祥明,谢谢。
 
检查窗体的Top的位置,如果在到了你所要求的范围内,就不断地减少Height
 
那跟OICQ的效果不一样, 不做处理的话当点击屏幕其它位置时,窗体就显示在任务栏上。
 
我以前做过
最简单地就是用定时器(不过很占CPU)
if form.top<5 then
form.top:=-(form.height-5)
 
使用Snap功能。
 
请祥点说明,在下感激不尽!!!
 
我也想知道,最好是有什么控件可以实现这个功能。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
顶部