怎样才能使程序窗口最小化至托盘

znhbj · 发表于 2012-9-2 21:46:42

试验一下好不好用，谢谢

yufei8051 · 发表于 2012-11-16 11:51:17

这个系统默认不就是这样吗？

damoo · 发表于 2014-4-12 09:47:00

#include <GUIConstantsEx.au3>
#include <Constants.au3>
Opt("TrayOnEventMode", 1)
Opt("GUIOnEventMode", 1)
Opt("TrayMenuMode", 1)
$hgui = GUICreate("将程序在托盘中显示、隐藏托盘", 300, 200, -1, -1)
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "gui")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "gui")
TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE, "TrayEvent")
While 1
        Sleep(100)
WEnd
Func TrayEvent()
        Switch @TRAY_ID
                Case $TRAY_EVENT_PRIMARYDOUBLE
                        GUISetState(@SW_SHOWNORMAL)
        EndSwitch
EndFunc   ;==>TrayEvent
Func gui()
        Switch @GUI_CtrlId
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $GUI_EVENT_MINIMIZE
                        GUISetState(@SW_HIDE)
        EndSwitch
EndFunc   ;==>gui

fybhwsx · 发表于 2014-7-27 12:30:32

damoo 发表于 2014-4-12 09:47

谢谢，学习了。。。

253357752 · 发表于 2015-5-23 16:33:34

学习中，谢谢

xia_xia · 发表于 2016-2-21 15:48:19

学习中，谢谢

		自动登录	找回密码
密码			加入