标题:[求助]谁能提供一个最小化到系统托盘的例子?
取消只看楼主
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
结帖率:100%
 问题点数:0 回复次数:5 
[求助]谁能提供一个最小化到系统托盘的例子?
正在做这样的东西,遇到很多不明白的地方,希望有个例子看看,先谢谢啦
搜索更多相关主题的帖子: 托盘 例子 系统 
2007-09-20 20:26
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
有个问题,就是最小化到系统托盘后在任务栏处还有哦。。。。

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

走自己的路,让人说去
2007-09-20 21:40
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
谢谢2位版主

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

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

就想BT那样。。。。

走自己的路,让人说去
2007-09-20 21:56
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(multiple1902)楼上的……我个人认为,也许Fo...

Form.Visible=False

实现了,谢谢


走自己的路,让人说去
2007-09-20 21:59
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(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
请问有什么不妥的地方吗?

走自己的路,让人说去
2007-09-21 09:36
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
请问在哪里可以设置当缩进托盘后可以使用左右键?

走自己的路,让人说去
2007-09-21 11:38



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-171631-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.415199 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved