Spoiler anzeigen
#include<GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
_GDIPlus_Startup()
$hGUI = GUICreate("Form1", 625, 443, 192, 124)
$Graphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
GUISetState(@SW_SHOW)
$Rot = _GDIPlus_PenCreate (0xFFFF0000)
$Gruen = _GDIPlus_PenCreate (0xFF00FF00)
$Blau = _GDIPlus_PenCreate (0xFF0000FF)
_GDIPlus_GraphicsClear($Graphic, 0xFF000000)
_GDIPlus_GraphicsDrawLine ($Graphic,100,10,2,200, $Rot)
_GDIPlus_GraphicsDrawLine ($Graphic,100,100,2,200, $Gruen)
_GDIPlus_GraphicsDrawLine ($Graphic,200,200,2,200, $Blau)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_GDIPlus_PenDispose($Rot)
_GDIPlus_PenDispose($Blau)
_GDIPlus_PenDispose($Gruen)
_GDIPlus_GraphicsDispose($Graphic)
_GDIPlus_Shutdown()
Exit
EndSwitch
WEnd
UEZ