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

yufei8051

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

damoo

#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

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

    谢谢，学习了。。。

253357752

学习中，谢谢

xia_xia

学习中，谢谢