#include <GUIConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
OnAutoItExitRegister("Quit");注册1个当AutoIt退出时执行的函数Quit
$Form2=GUICreate("安装选项",170,273,-1,-1)
GUICtrlCreateGroup("推荐软件安装",-1,-1,170,100)
GUICtrlCreateGroup("",-99,-99,1,1)
Local $Form2Pos=WinGetPos($Form2)
;返回一个含有下列信息的4维数组:
;$array[0] = X 坐标
;$array[1] = Y 坐标
;$array[2] = 宽度
; $array[3] = 高度
MsgBox(0,'',$Form2Pos[0]&@CRLF&$Form2Pos[1])
GUICtrlCreateGroup("可选软件安装",$Form2Pos[0]+1,$Form2Pos[1]+102,170,150)
GUICtrlCreateGroup("",-99,-99,1,1)
$Form1=GUICreate ( "我的第一个窗口", 484, 273,-1,-1)
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")
$check4=GUICtrlCreateCheckbox("安装", 20,235,50,25)
GUICtrlSetOnEvent($check4, "check4")
GUISetState (@SW_SHOW,$Form1)
While 1
Sleep(1000)
WEnd
Func check4()
Local $Form1Pos=WinGetPos($Form1)
;返回一个含有下列信息的4维数组:
;$array[0] = X 坐标
;$array[1] = Y 坐标
;$array[2] = 宽度
; $array[3] = 高度
If GUICtrlRead($check4)=$GUI_CHECKED Then
WinMove($Form2,"",$Form1Pos[0]+$Form1Pos[2],$Form1Pos[1])
;WinMove ( "窗口标题", "窗口文本", X坐标, Y坐标 [, 宽度 [, 高度[,速度]]] )
GUISetState(@SW_SHOW,$Form2)
Else
GUISetState(@SW_HIDE,$Form2)
EndIf
EndFunc
Func Quit()
Exit
EndFunc