- 博客(3)
- 收藏
- 关注
原创 Delphi下QQ窗体自动隐藏探索--3(转帖)
--3导读: Data); case AppBarData.uEdge of ABE_TOP : begin Cur_Top := AppBarData.rc.Bottom + 1; Cur_Bottom := Screen.Height - 1; end; ABE_LEFT : begin Cur_Top := 1; Cur_Bottom := Screen.Height - 1; en
2007-08-02 23:47:00 788 1
原创 Delphi下QQ窗体自动隐藏探索--2(转帖)
导读: akTop in FAnchors then Top := 0; if akRight in FAnchors then Left := Screen.Width - Width; if akBottom in FAnchors then Top := Screen.Height - Height; end else begin if akLeft in FAnchors then
2007-08-02 23:46:00 1007
原创 Delphi下QQ窗体自动隐藏探索--1(转帖)
导读: 腾讯QQ是当前流行的网络聊天工具之一,由于它在应用设计上有很多独特之处,所以也吸引了很多程序员对之进行研究和模仿。在这里,我将利用Delphi对QQ的窗体自动隐藏效果提出自己的实现方法。 一、问题的提出 熟悉QQ使用的朋友都知道,当QQ窗体区域超出屏幕四边时,窗体就会自动“消失”,只留下窗体一边的小部分显露在桌面上。当用鼠标移动到显露部分之上,窗体就会在隐藏位置重新完整显示;但当鼠标离开窗
2007-08-02 23:42:00 965
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人