Beiträge von teamnoobPDB

  • Problem mit Switch in For-Schleife

    Hallo Community,

    kann es sein das ein Switch in einer For-Schleife Probleme bereitet?
    Ich habe eine Variable $abMarkt die mit Button Controls gefüllt ist , und will diese hiermit abfragen:

    Spoiler anzeigen
    [autoit]

    For $i = 0 To 9 Step 1
    Switch GUIGetMsg()
    Case $abMarkt[$i]
    Switch ControlGetText("[TITLE:" & _Getlang(1) & _GetLang(2) & "]","",$abMarkt[$i])
    Case _GetLang(12)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(13)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(14)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(15)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(16)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(17)

    [/autoit] [autoit][/autoit] [autoit]

    Case _GetLang(18)
    __f_Inventar_Open()
    EndSwitch
    EndSwitch
    Next

    [/autoit]


    Doch das macht AutoIt anscheinend nicht, denn wenn ich auf einen Button drücke den ich mit einer Funktion bestückt habe drücke dann passiert nichts.
    Kann mir da jemand vlt. helfen

  • Funktionen werden zu Objekten - Das OCFGV-Paradigma - Eigene Objekte in 2 Zeilen

    Ich weiß nicht woran es liegen kann aber dein Beispiel Funktioniert aber meins was nach dem Nachfragen heute eigentlich richtig sein sollte wird nicht dargestellt ... Kann es sein das deine UDF einen Bug hat? Oder Kann es an meinem PC liegen oder darand das noch irgendetwas falsch ist??? Ich wäre dir sehr verbunden wenn du mir helfen würdest;)

    Hier nochmal allesin einer Datei:

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <Array.au3>
    #include <GDIPlus.au3>
    #include <GuiConstantsEx.au3>
    #include <WinAPI.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Local $oGraph, $abcdef = _MakeObj($oGraph)
    Global Const $Width = 500, $Height = 500
    Global $hGraphic, $hBitmap, $hBuffer

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate("Meine Funktion als Objekt",$Width,$Height)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.StartUp($hGui)

    [/autoit] [autoit][/autoit] [autoit]

    While Sleep(10)
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    $oGraph.Shutdown()
    Exit
    EndSwitch

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.Clear_Buffer()
    $oGraph.Draw_Line(10,10,100,100)
    $oGraph.Draw_Buffer()
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_StartUp($hG)
    Local $aParameters = _($oGraph.StartUp_Parameters)
    _GDIPlus_Startup()
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($aParameters[1])
    $hBitmap = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $hGraphic)
    $hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Clear_Buffer()
    _GDIPlus_GraphicsClear($hBuffer,0xFFFFFFFF)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Line($x1,$y1,$x2,$y2)
    Local $aParameters = _($oGraph.Draw_Line_Parameters)
    _GDIPlus_GraphicsDrawLine($hBuffer,$aParameters[1],$aParameters[2],$aParameters[3],$aParameters[4])
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Buffer()
    _GDIPlus_GraphicsDrawImageRect($hGraphic,$hBitmap,0,0,$Width,$Height)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Shutdown()
    _GDIPlus_GraphicsClear($hGraphic)
    _WinAPI_DeleteObject($hBuffer)
    _GDIPlus_BitmapDispose($hBitmap)
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_Shutdown()
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ; #FUNCTION# ====================================================================================================================
    ; Name ..........: _MakeObj
    ; Description ...: Creates & registers a system object fireing events wich start the functions given
    ; Syntax ........: _Object_CreateFromFunctions(Byref $obj, $Array)
    ; Parameters ....: $obj - A previously declared Variable to write the object to
    ; $Array - Array of function names and parameter counts
    ; Authors .......: minx, BugFix
    ; Remarks .......: [Heute, 01:08] Von name22: Mir fällt kein expliziter Verwendungszweck ein, aber es ist auf jeden Fall ziemlich cool.
    ; ===============================================================================================================================
    Func _MakeObj(ByRef $obj)
    Local $_=StringSplit("Func\s+__o_([\w_]+)\(([$\w_\s=,]+)?\)|$|(\$\w+)|"&Random(1000,9999,1)&'|<method name="|<property name="|_Parameters|<event name="|" dispid="|fireEvent("|Function|component>|<registration progid="|public>|<script language="VBScript">|</script>||',"|",2),$aFunc=StringRegExp(FileRead(@ScriptFullPath),$_[0],3),$Array[UBound($aFunc)][2],$n,$k=@TempDir&'\'&$_[3]&'.wsc'
    If Not IsDeclared("objContainer") Then Global $objContainer[1]=[$_[3]+OnAutoItExitRegister("_del_")]
    For $i = 0 To UBound($aFunc)-1
    If StringLeft($aFunc[$i], 1)=$_[1] Then ContinueLoop
    $Array[$n][0] = $aFunc[$i]
    If StringLeft($aFunc[$i+1],1)=$_[1] Then
    $Array[$n][1]=UBound(StringRegExp($aFunc[$i+1],$_[2],3))
    EndIf
    $n += 1
    Next
    ReDim $Array[UBound($Array)-1][2]
    For $i = 0 To UBound($Array)-1
    $_[16] &= $_[4]&$Array[$i][0]&'"/>'&@lf&$_[5]&$Array[$i][0]&$_[6]&'"/>'&@lf&$_[7]&$Array[$i][0]&$_[8]&$i&'"/>'&@lf
    $_[17] &= $_[10]&' '&$Array[$i][0]&'('&_f($Array[$i][1],",")&')'&@lf&$Array[$i][0]&$_[6]&'='&_f($Array[$i][1],'&"|"&',1)&@lf&$_[9]&$Array[$i][0]&'")'&@lf&'End '&$_[10]&@lf
    Next
    Global $oAU3Error = ObjEvent("AutoIt.Error","_er")
    BitOR(FileDelete($k),FileWrite($k, "<"&$_[11]&@lf&$_[12]&$_[3]&'"/>'&@lf&'<'&$_[13]&@lf&$_[16]&@lf&'</'&$_[13]&@lf&@lf&$_[14]&@lf& $_[17]&@lf&$_[15]&@lf&'</'&$_[11]),RunWait('regsvr32.exe /s "' & $k, @TempDir),Assign("obj",ObjCreate($_[3])),ObjEvent($obj, "__o_"))
    EndFunc
    Func _f($n, $s, $l = False)
    If $n Then
    $out = ""
    For $i=1 To $n
    $out&="v"&$i-1&$s
    Next
    Return StringTrimRight($out,StringLen($s))
    Else
    If $l Then Return '""'
    Return ''
    EndIf
    EndFunc
    Func _($str)
    Return StringSplit($str, "|")
    EndFunc
    Func _er()
    ConsoleWrite("!> An error occurred ("&$oAU3Error.description&")"&@LF)
    EndFunc
    Func _del_()
    For $i=0 To UBound($objContainer)-1
    ConsoleWrite("-> Delete Objects (Return: "&FileDelete(@TempDir&"\"&$objContainer[$i]&".wsc")&"). Did it even exist: "&FileExists(@TempDir&"\"&$objContainer[$i]&".wsc")&@LF)
    Next
    EndFunc

    [/autoit]

  • Funktionen werden zu Objekten - Das OCFGV-Paradigma - Eigene Objekte in 2 Zeilen

    Cool danke :D Jetzt bekomme ich zwar keine Fehler und Errors mehr aber es kommt auch keine Gui :D

    Kann das vlt. an Windows 8 liegern ? :o

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <obj_v2.au3>
    #include <GDIPlus.au3>
    #include <GuiConstantsEx.au3>
    #include <WinAPI.au3>
    ;#include <Array.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Local $oGraph, $abcdef = _MakeObj($oGraph)
    Global Const $Width = 500, $Height = 500
    Global $hGraphic, $hBitmap, $hBuffer

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate("Meine Funktion als Objekt",$Width,$Height)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.StartUp($hGui)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.Clear_Buffer()
    $oGraph.Draw_Line(10,10,100,100)
    $oGraph.Draw_Buffer()

    [/autoit] [autoit][/autoit] [autoit]

    While Sleep(10)
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    $oGraph.Shutdown()
    Exit
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_StartUp($hG)
    Local $aParameters = _($oGraph.StartUp_Parameters)
    _GDIPlus_Startup()
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($aParameters[1])
    $hBitmap = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $hGraphic)
    $hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Clear_Buffer()
    _GDIPlus_GraphicsClear($hBuffer,0xFFFFFFFF)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Line($x1,$y1,$x2,$y2)
    Local $aParameters = _($oGraph.Draw_Line_Parameters)
    _GDIPlus_GraphicsDrawLine($hBuffer,$aParameters[1],$aParameters[2],$aParameters[3],$aParameters[4])
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Buffer()
    _GDIPlus_GraphicsDrawImageRect($hGraphic,$hBitmap,0,0,$Width,$Height)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Shutdown()
    _GDIPlus_GraphicsClear($hGraphic)
    _WinAPI_DeleteObject($hBuffer)
    _GDIPlus_BitmapDispose($hBitmap)
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_Shutdown()
    EndFunc

    [/autoit]

  • Funktionen werden zu Objekten - Das OCFGV-Paradigma - Eigene Objekte in 2 Zeilen

    Sorry das war mein Fehler ...
    Habs jetzt nochmal überarbeitet...

    ich kriege zwar keinen Syntax error mehr aber die meldung mit dem bereits existierenden Namen kommt immernoch...

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <obj_v2.au3>
    #include <GDIPlus.au3>
    #include <GuiConstantsEx.au3>
    #include <WinAPI.au3>
    #include <Array.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Local $oGraph, $abcdef = _MakeObj($oGraph)
    Global Const $Width = 500, $Height = 500
    Global $hGraphic, $hBitmap, $hBuffer

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate("Meine Funktion als Objekt",$Width,$Height)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.StartUp($hGui)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.Clear_Buffer($hBuffer)
    $oGraph.Draw_Line($hBuffer,10,10,100,100)
    $oGraph.Draw_Buffer($hGraphic, $hBitmap)

    [/autoit] [autoit][/autoit] [autoit]

    While Sleep(10)
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    $oGraph.Shutdown($hGraphic, $hBitmap, $hBuffer)
    Exit
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_StartUp($hG)
    Local $aParameters = _($oGraph.StartUp_Parameters)
    _GDIPlus_Startup()
    Global $hGraphic = _GDIPlus_GraphicsCreateFromHWND($aParameters[1])
    Global $hBitmap = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $hGraphic)
    Global $hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Clear_Buffer($hBu)
    Local $aParameters = _($oGraph.Clear_Buffer_Parameters)
    _GDIPlus_GraphicsClear($aParameters[1],0xFFFFFFFF)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Line($hBu,$x1,$y1,$x2,$y2)
    Local $aParameters = _($oGraph.Draw_Line_Parameters)
    _GDIPlus_GraphicsDrawLine($aParameters[1],$aParameters[2],$aParameters[3],$aParameters[4],$aParameters[5])
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Buffer($hGr,$hBi)
    Local $aParameters = _($oGraph.Draw_Buffer_Parameters)
    _GDIPlus_GraphicsDrawImageRect($aParameters[1],$aParameters[2],0,0,$Width,$Height)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Shutdown($hGr, $hBi, $hBu)
    Local $aParameters = _($oGraph.Shutdown_Parameters)
    _GDIPlus_GraphicsClear($aParameters[1])
    _WinAPI_DeleteObject($aParameters[3])
    _GDIPlus_BitmapDispose($aParameters[2])
    _GDIPlus_GraphicsDispose($aParameters[1])
    _GDIPlus_Shutdown()
    EndFunc

    [/autoit]

  • Funktionen werden zu Objekten - Das OCFGV-Paradigma - Eigene Objekte in 2 Zeilen

    Wenn ich aber jetzt die Parameter abfrage bekomme ich einen Syntax Error?????

    Ich habe jetzt mal die StartUp-Funktion geändert...

    [autoit]

    Func __o_StartUp($hG, $hGr, $hBi, $hBu)
    $aParameters = _($oGraph.StartUp_Parameters)
    _GDIPlus_Startup()
    Global $aParameters[2] = _GDIPlus_GraphicsCreateFromHWND($aParameters[1])
    Global $aParameters[3] = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $aParameters[2])
    Global $aParameters[4] = _GDIPlus_ImageGetGraphicsContext($aParameters[3])
    EndFunc

    [/autoit]

  • Funktionen werden zu Objekten - Das OCFGV-Paradigma - Eigene Objekte in 2 Zeilen

    Hallo minx,

    ich finde essehr toll und praktisch wie du das gemacht hast, wenn es dann bei mir funktionieren würde :/ Entweder bin ich zu doof oder es klappt bei mir halt nicht.
    Ich bekomme hier immer die rückmeldung, dass "[22,15] Dieser Name existiert bereits:"... und dann klappt nichts.
    Ich habe wie in deinem Beispiel alles ähnlich gemacht nur das ich statt GuiCTRLCreateGraphic GDI+ verwende.

    Ich hoffe dass du mein Problem beheben kannst...

    P.S.: Hier mein Skript:

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <obj_v2.au3>
    #include <GDIPlus.au3>
    #include <GuiConstantsEx.au3>
    #include <WinAPI.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Local $oGraph, $abcdef = _MakeObj($oGraph)
    Global Const $Width = 500, $Height = 500
    Global $hGraphic, $hBitmap, $hBuffer

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate("Meine Funktion als Objekt",$Width,$Height)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.StartUp($hGui, $hGraphic, $hBitmap, $hBuffer)

    [/autoit] [autoit][/autoit] [autoit]

    $oGraph.Clear_Buffer($hBuffer)
    $oGraph.Draw_Line($hBuffer,10,10,100,100)
    $oGraph.Draw_Buffer($hGraphic, $hBitmap)

    [/autoit] [autoit][/autoit] [autoit]

    While Sleep(10)
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    $oGraph.Shutdown($hGraphic, $hBitmap, $hBuffer)
    Exit
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_StartUp($hG, $hGr, $hBi, $hBu)
    _GDIPlus_Startup()
    Global $hGr = _GDIPlus_GraphicsCreateFromHWND($hG)
    Global $hBi = _GDIPlus_BitmapCreateFromGraphics($Width, $Height, $hGr)
    Global $hBu = _GDIPlus_ImageGetGraphicsContext($hBi)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Clear_Buffer($hBu)
    _GDIPlus_GraphicsClear($hBu,0xFFFFFFFF)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Line($hBu,$x1,$y1,$x2,$y2)
    _GDIPlus_GraphicsDrawLine($hBu,$x1,$y1,$x2,$y2)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Draw_Buffer($hGr,$hBi)
    _GDIPlus_GraphicsDrawImageRect($hGr,$hBi,0,0,$Width,$Height)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func __o_Shutdown($hGr, $hBi, $hBu)
    _GDIPlus_GraphicsClear($hGr)
    _WinAPI_DeleteObject($hBu)
    _GDIPlus_BitmapDispose($hBi)
    _GDIPlus_GraphicsDispose($hGr)
    _GDIPlus_Shutdown()
    EndFunc

    [/autoit]

  • [Läuft] 2D/(3D)? RPG Spiel in AutoIt

    Das Projekt mit dem 2D/(3D)? RPG Spiel ist am Laufen :D
    Ich freue mich sehr darüber dass:
    -Skilkor
    -Make-Grafik
    -derBrot
    -StevenX
    -Joriktos
    -und meine Wenigkeit
    daran beteiligt sind ;)

    Es sollten bitte NUR die oben genannten Entwickler hier Posten!
    Aber trotzdem können sich alle User die hier (hoffentlich bald) veröffentlichten Versionen herunterladen

    Link zur To-Do Liste:
    To-Do-Liste

    Link zum Item System(Bitte auf Fehler Testen!:(
    Item-System

    Link zum Map System(Bitte auf Fehler Testen!:(
    Map System

  • RosettaCode Sammelthread

    Art: Neu-Implementierung
    Task: http://rosettacode.org/wiki/GUI_enabl…ing_of_controls
    Beteiligte: teamnoobPDB
    Skript:

    Spoiler anzeigen
    [autoit]

    #include <GuiConstantsEx.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $hGui = GUICreate("MyGui",300,100)

    [/autoit] [autoit][/autoit] [autoit]

    $hInput = GUICtrlCreateInput("0",10,10,280,20)
    $hAdd = GUICtrlCreateButton("Increment",10,40,130,30)
    $hDel = GUICtrlCreateButton("Decrement",160,40,130,30)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    While Sleep(10)
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hAdd
    $Input = Int(GUICtrlRead($hInput))
    If $Input < 10 Then
    $Input += 1
    EndIf
    If $Input <> 0 Then
    GUICtrlSetState($hInput,$GUI_DISABLE)
    Else
    GUICtrlSetState($hInput,$GUI_ENABLE)
    EndIf
    GUICtrlSetData($hInput,$Input)
    Case $hDel
    $Input = Int(GUICtrlRead($hInput))
    If $Input > 0 Then
    $Input -= 1
    EndIf
    If $Input <> 0 Then
    GUICtrlSetState($hInput,$GUI_DISABLE)
    Else
    GUICtrlSetState($hInput,$GUI_ENABLE)
    EndIf
    GUICtrlSetData($hInput,$Input)
    EndSwitch
    WEnd

    [/autoit]

  • RosettaCode Sammelthread

    Art: Neu-Implementierung
    Task: http://rosettacode.org/wiki/Keyboard_macros
    Beteiligte: teamnoobPDB
    Skript:

    Spoiler anzeigen
    [autoit]

    #include <Misc.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global $Pressed = 0

    [/autoit] [autoit][/autoit] [autoit]

    HotKeySet("{ENTER}","_Enter"); Set ENTER as application-specific Hotkey

    [/autoit] [autoit][/autoit] [autoit]

    Do
    Sleep(10)
    Until $Pressed = 1

    [/autoit] [autoit][/autoit] [autoit]

    Func _Enter()
    MsgBox(64,"HotKey","You Pressed ENTER" & @CRLF & "set as application-specific HotKey.")
    $Pressed = 1
    EndFunc

    [/autoit]

  • RosettaCode Sammelthread

    Art: Neu-Implementierung
    Task: http://rosettacode.org/wiki/Substring/Top_and_tail
    Beteiligte: teamnoobPDB
    Script:

    Spoiler anzeigen
    [autoit]

    $Str = "upraisers"

    [/autoit] [autoit][/autoit] [autoit]

    ConsoleWrite($Str & @CRLF); Full String
    ConsoleWrite(StringTrimRight($Str,1) & @CRLF); Removed last char
    ConsoleWrite(StringTrimLeft($Str,1) & @CRLF); Removed first char
    ConsoleWrite(StringTrimRight($Str,2) & @CRLF); Removed last 2 chars
    ConsoleWrite(StringTrimLeft($Str,2) & @CRLF); Removed first 2 char

    [/autoit]

  • [Suche Leute] 2D RPG-Spiel in Autoit

    Respekt an diese Leute ;)

    Wie dem auch sei :D
    Ich will es halt selbst mal machen und suche halt Leute die mich unterstützen und mir Helfen ;)

    ohforf: Ja ich hatte es soweit dass ich fast das Kampfsystem angefangen hätte aber es wurde dann zu Kompliziert bzw. ich hab die Irrlicht Engine wahrscheinlich nicht richtig benutzt und daswegen lief es nicht so rund :D

  • [Suche Leute] 2D RPG-Spiel in Autoit

    Danke für die Tipps :D
    Ich hatte das spiel schonmal vorher in der Irrlicht geschrieben nur das war nix :D
    Dann hab ich das gestern und heute mal zusammen gebastelt und das diente ja nur als Idee welche Grafikebene wir verwenden das ist noch offen :D Wobei es natürlich eine Herausforderung wäre das in GDI+ zu schreiben :D
    Ich glaube das hat noch keiner gemacht ;)