Hallo habe demletzt von Hauke ein Spiel gesehen das meine interesse geweckt hat . Jetzt habe ich versucht so was (ähnliches) auch zu machen ,aber es funktioniert nicht richtig ... ich möchte in einer while schleife die Position des Zeigers auslesen lassen und überprüfe ob der zeiger auf einem Rechteck ist..... soweit so gut.. es funktioniert auch ABER nur einmal nachdem das 2. Rechteck gezeichnet worden ist passiert nichts mehr
[autoit]#include
#include
#include
_GDIPlus_Startup()
[/autoit][autoit][/autoit][autoit]#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("GDI + Spiel", 617, 694, 194, 122)
GUISetBkColor(0x000077)
$graphik = _GDIPlus_GraphicsCreateFromHWND($Form1)
$starten = GUICtrlCreateButton("Starten", 100, 100, 400, 400)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
[/autoit][autoit][/autoit][autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_GDIPlus_GraphicsDispose($graphik)
_GDIPlus_Shutdown()
Exit
Case $starten
GUICtrlDelete($starten)
GUISetBkColor(0x999900, $Form1)
$rand_x = 10
$rand_y = 10
_GDIPlus_GraphicsFillRect($graphik, $rand_x, $rand_y, 80, 80)
While 1
$nMsg2 = GUIGetMsg()
If $nMsg2 = -3 Then
_GDIPlus_GraphicsDispose($graphik)
_GDIPlus_Shutdown()
Exit
EndIf
$getpos = GUIGetCursorInfo()
If $getpos[0] > $rand_x And $getpos[0] < 80 And $getpos[1] > $rand_y And $getpos[1] < 80 Then
$rand_x = Random(1, 600, 1)
$rand_y = Random(1, 600, 1)
_GDIPlus_GraphicsFillRect($graphik, $rand_x, $rand_y, 80, 80)
EndIf
[/autoit][autoit][/autoit][autoit]WEnd
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]EndSwitch
[/autoit][autoit][/autoit][autoit]WEnd
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]