#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet ("1", "_Exit")
$Width = 353
$Height = 501
$dHeight = 1
$dWidth = 1
$GUI_Back_Color = 0xFF000000 + 0xF0F0F0
_GDIPlus_StartUp()
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Worms AutoIt", 353, 501, 450, 167)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Graphic = _GDIPlus_GraphicsCreateFromHWND($Form1)
$Bitmap = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $Graphic)
$Backbuffer = _GDIPlus_ImageGetGraphicsContext($Bitmap)
_GDIPlus_GraphicsDrawRect($Backbuffer,1,1,200,200)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_GDIPlus_GraphicsDrawRect($Backbuffer,$dWidth,$dHeight,200,200)
EndSwitch
Sleep (1000)
_ReDraw()
_GDIPlus_GraphicsClear($Backbuffer, $GUI_Back_Color)
WEnd
Func _Exit()
_GDIPlus_ShutDown()
_GDIPlus_GraphicsDispose($Graphic)
_GDIPlus_BitmapDispose($Bitmap)
Exit
EndFunc
Func _ReDraw()
$dWidth+=1
$dHeight+=1
_GDIPlus_GraphicsDrawRect($Backbuffer,$dWidth,$dHeight,200,200)
EndFunc
Hm...
Er malt doch in den BackBuffer, was habe ich vergessen ?