Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <GDIPlus.au3>
- ;...
- _GDIPlus_Startup() ; GDI+ starten
- $GUI = GUICreate($Title, $Width, $Height) ; GUI erstellen
- $Graphics = _GDIPlus_GraphicsCreateFromHWND($GUI) ; Grafik erstellen
- $Bitmap = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $Graphics) ; Bitmap erstellen
- $Buffer = _GDIPlus_ImageGetGraphicsContext($Bitmap) ; Bitmap als Buffer benutzen
- GUISetState(@SW_SHOW, $GUI) ; GUI anzeigen
- Do
- _GDIPlus_GraphicsClear($Buffer, $BackgroundColor) ; Buffer leeren
- _GDIPlus_GraphicsDraw...($Buffer, ...) ; verschiedenste Elemente auf Buffer zeichnen
- _GDIPlus_GraphicsDrawImageRect($Graphics, $Bitmap, 0, 0, $Width, $Height) ; Buffer in Grafik zeichnen
- Switch GUIGetMsg() ; Nachrichten der GUI auswerten
- Case -3 ; $GUI_EVENT_CLOSE
- ExitLoop ; Schleife verlassen
- EndSwitch
- Until False ; Endlosschleife
- _GDIPlus_GraphicsDispose($Buffer) ; alle
- _GDIPlus_BitmapDispose($Bitmap) ; Ressourcen
- _GDIPlus_GraphicsDispose($Graphics) ; freigeben
- _GDIPlus_Shutdown() ; GDI+ beenden
- Exit ; Skript beenden
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement