[求助]谁能提供一个最小化到系统托盘的例子？ - 编程论坛

#2

purana2007-09-20 20:49

只有本站会员才能查看附件，请登录

#3

lrd19862007-09-20 21:40

有个问题，就是最小化到系统托盘后在任务栏处还有哦。。。。

请问如何才能只在托盘而不在任务栏显示？

#4

multiple19022007-09-20 21:44

自己查Form的属性。

#5

purana2007-09-20 21:48

Form.ShowInTaskBar=false

#6

multiple19022007-09-20 21:54

楼上的……

我个人认为，也许Form.Visible=False更适合

#7

lrd19862007-09-20 21:56

谢谢2位版主

但是这样会缩到左下角的哦。。。。

不能除了在系统托盘显示外，其他地方都不显示吗？

就想BT那样。。。。

#8

multiple19022007-09-20 21:58

Me.Visible=False
要是在别的地方显示了你找我。

#9

lrd19862007-09-20 21:59

回复：（multiple1902）楼上的……我个人认为，也许Fo...

Form.Visible=False

实现了，谢谢

#10

寻找2007-09-20 22:35

OK，3Q

#11

lrd19862007-09-21 09:36

回复：（purana）[upload=rar]viewFile.asp?ID=27763[...

还有2个问题

1.进入系统托盘后如何使用鼠标的左右键？如单击左键显示主界面，右键选择功能

2.为了实现单击最小化按钮可以缩进系统托盘，我使用的代码是：
Private Sub Form_Resize()
If Me.WindowState = 1 Then '最小化
AddToTray Me
frmMain.Visible = False '最小化时不在任务栏显示
SetTrayBalloon 123, "我的软件", "双击打开" '最小化到系统托盘时的提示语
SetTrayIcon LoadPicture(App.Path & "\pictuer\heart.ico") '在系统托盘显示的图标
End If
End Sub
请问有什么不妥的地方吗？

#12

lrd19862007-09-21 11:38

请问在哪里可以设置当缩进托盘后可以使用左右键？

#13

juxn0012013-07-17 21:59

回复 8楼 multiple1902

这样在托盘图标区也没有啊？