Zamykanie programu

[Nightwish331]

Dopiero zaczynam zabawę z AutoIt i mam pytanie, a mianowicie co dopisać do kodu, żeby ta aplikacja się zamknęła po wciśnięciu krzyżyka?

 

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$x = MouseGetPos(0)
$y = MouseGetPos(1)

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 228, 93, 296, 191)
$Label1 = GUICtrlCreateLabel("x: " & $x, 40, 40, 60, 17)
$Label2 = GUICtrlCreateLabel("y: " & $y, 128, 40, 68, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
	$x = MouseGetPos(0)
	$y = MouseGetPos(1)
$Label1 = GUICtrlCreateLabel("x: " & $x, 40, 40, 60, 17)
$Label2 = GUICtrlCreateLabel("y: " & $y, 128, 40, 68, 25)
Sleep(200)

If   HotKeySet("{Esc}") Then
	WinClose

EndIf

 

[Marchwj]

Po pierwsze to nawet nie działa, niezamknięta pętla while, jakiś IF z dupy no i pomysł z while 1 nie jest najlepszy. Widzę, że używasz HotKeySet, więc pewnie chodzi Ci o takie coś (po naciśnięciu ESC zamyka program)

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>


HotKeySet("{Esc}", "close")
$x = MouseGetPos(0)
$y = MouseGetPos(1)

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 228, 93, 296, 191)
$Label1 = GUICtrlCreateLabel("x: " & $x, 40, 40, 60, 17)
$Label2 = GUICtrlCreateLabel("y: " & $y, 128, 40, 68, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
	$x = MouseGetPos(0)
	$y = MouseGetPos(1)
$Label1 = GUICtrlCreateLabel("x: " & $x, 40, 40, 60, 17)
$Label2 = GUICtrlCreateLabel("y: " & $y, 128, 40, 68, 25)
Sleep(200)
WEnd

Func close()
   Exit
EndFunc

 

[Nightwish331]

Dzięki wielkie :))