FileInstall("register.reg", @TempDir & "\register.reg", 1)
FileInstall("Inpaint.exe", @TempDir & "\Inpaint.exe", 1)
$GUI = GUICreate("我要的窗口", 240, 160)
$Button_1 = GUICtrlCreateButton("执行", 30, 100, 180)
GUISetState()
While 1
$msg = GUIGetMsg()
Switch $msg
Case - 3
FileDelete(@TempDir & "\register.reg")
FileDelete(@TempDir & "\Inpaint.exe")
Exit
Case $Button_1
RunWait(@ComSpec & ' /c regedit /s "' & @TempDir & '\register.reg' & '"', '', @SW_HIDE)
Run(@TempDir & "\Inpaint.exe")
EndSwitch
WEnd
|