Hallo,
wie zeichnet man Frei eine Linie Auf den Bildschirm?
LG Pceumel
wie zeichnet man Frei eine Linie Auf den Bildschirm
-
- [ gelöst ]
-
pceumel -
6. November 2008 um 16:07 -
Geschlossen -
Erledigt
-
-
- Offizieller Beitrag
Wie bitte?
-
Na mit einem Edding Plakatschreiber
nein im Ernst, was genau willst du machen?
-
Eine Linie Wie in der Hilfe (nur mit dem Unterschied das ich es hier verstehen Will!)
Also mit GDI++ -
- Offizieller Beitrag
Es ist echt schwierig mit Dir.
Was verstehst Du denn an dem Beispiel in der Hilfe nicht?
Was willst Du machen? Und wie können wir Dir dabei helfen? -
OK,
ich möchte eine Art Bildschirmschoner Basteln der Linien auf dem Bildschirm Zieht (Zufallsfarbe)!
Wo auf dem Bildschirm ist auch egal -
- Offizieller Beitrag
Hab ich Dir mal erstellt:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <GuiConstantsEx.au3>
#include <GDIPlus.au3>
_Main()Func _Main()
[/autoit]
Local $hGUI, $hWnd, $hGraphic, $hPen, $aPos[2], $aOldPos[2]
Local $width = @DesktopWidth, $height = @DesktopHeight
$hGUI = GUICreate("GDI+", $width, $height)
$hWnd = WinGetHandle("GDI+")
GUISetState()
_GDIPlus_Startup()
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hWnd)
$hPen = _GDIPlus_PenCreate(0xff00ff00, 4)
Do
$aPos[0] = Random(0, $width, 1)
$aPos[1] = Random(0, $height, 1)
_GDIPlus_GraphicsDrawLine($hGraphic, $aOldPos[0], $aOldPos[1], $aPos[0], $aPos[1], $hPen)
_GDIPlus_PenSetColor($hPen, '0xFF' & StringRight(Hex(Random(0, 16777215, 1)), 6))
$aOldPos[0] = $aPos[0]
$aOldPos[1] = $aPos[1]
Sleep(200)
Until GUIGetMsg() = $GUI_EVENT_CLOSE
; Clean up resources
_GDIPlus_PenDispose($hPen)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_Shutdown()
EndFunc ;==>_Main -
Danke!