请问能将窗体设置成象QQ一样的效果吗?高手们再进来谈谈

江南逍遥客 · 发表于 2010-12-16 12:51

请问能将窗体设置成如QQ一样的效果吗?
就是说如QQ一样平时窗口隐藏在显示器的右上角，当鼠标移至时，便自动全部显示出来,移开时又隐藏在右上角?
这种自动收放的效果，不知否能实现?高手老师们不知有没有尝试过？

[ 本帖最后由江南逍遥客于 2010-12-17 21:11 编辑 ]

张三李四 · 发表于 2010-12-16 13:14

估计专等楼主开发了。

江南逍遥客 · 发表于 2010-12-16 13:16

这个想都不敢想。我是出于好奇，好是能实现，那就太好了。

HHAAMM · 发表于 2010-12-16 18:22

这有何难
添加一窗体，放上下面代码

Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If UserForm1.Top < 10 Then
      If UserForm1.Caption = "QQ" Then
         UserForm1.Top = UserForm1.Height * -1 + 3
         UserForm1.Caption = "zc"
      Else
         UserForm1.Top = 0
         UserForm1.Caption = "QQ"
      End If
End If
End Sub

HHAAMM · 发表于 2010-12-16 18:26

例子

maditate · 发表于 2010-12-16 18:26

向版主学习

gjy631101 · 发表于 2010-12-16 19:14

版主确实高啊。不过，经测试，好象不能让多个窗体同时实现。

AVEL · 发表于 2010-12-16 23:48

呵呵这个不错啊。。

嗯学习了、

江南逍遥客 · 发表于 2010-12-17 21:04

报告版主，经测试，发现它虽然能同QQ一样隐藏，却不能同QQ一样操作。当鼠标移至时，虽然窗体显示了出来，但只要鼠标稍稍一动，就又没了。不能象QQ一样显示出来就可以点击操作。必须要手动把它移下一点，才能操作。请问对此有什么好办法吗？

[ 本帖最后由江南逍遥客于 2010-12-17 21:10 编辑 ]

江南逍遥客 · 发表于 2010-12-17 21:12

高手们想想办法，有什么方法能解决9楼所说的问题？

		自动登录	找回密码
密码			免费注册

[求助] 请问能将窗体设置成象QQ一样的效果吗?高手们再进来谈谈

回复 2楼张三李四的帖子

回复 4楼 HHAAMM 的帖子

回复 5楼 HHAAMM 的帖子

回复 5楼 HHAAMM 的帖子

[求助] 请问能将窗体设置成象QQ一样的效果吗?高手们再进来谈谈

回复 2楼 张三李四 的帖子

回复 4楼 HHAAMM 的帖子

回复 5楼 HHAAMM 的帖子

回复 5楼 HHAAMM 的帖子

回复 2楼张三李四的帖子