论坛 › 已解决问题区 › 请问当点击最小化时form为隐藏是怎样做才成呢？

dzx8152 发表于 2009-3-28 17:11:52

请问当点击最小化时form为隐藏是怎样做才成呢？

请问当点击最小化时form为隐藏，当单击托盘时才能出现是怎样做才成呢？

多谢。。。。。。。。。。。。。

[ 本帖最后由 dzx8152 于 2009-3-28 21:12 编辑 ]

sxd 发表于 2009-3-28 18:04:24

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
Opt("TrayOnEventMode", 1)
TraySetClick(8)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 318, 168, 214, 147)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###
TraySetOnEvent(-7, "TrayClick")


While 1
        Sleep(100)
WEnd

Func Form1Close()
        Exit
EndFunc   ;==>Form1Close

Func Form1Minimize()
        GUISetState(@SW_HIDE)
EndFunc   ;==>Form1Minimize

Func TrayClick()
        GUISetState(@SW_SHOW)
EndFunc   ;==>TrayClick

hhasee 发表于 2009-3-30 08:30:31

:face (37): 好东东，学习了！

查看完整版本: 请问当点击最小化时form为隐藏是怎样做才成呢？