farbtabelle

  • hi mach mir grad ein farbtabelle und krieg einen seltsammen error ohne zeie und widnows schreibt das programm muss beedet werden.

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>
    #include <GDIPlus.au3>
    #include <Misc.au3>
    #include <Array.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <ButtonConstants.au3>
    #include <Constants.au3>
    #include <WinAPI.au3>

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

    $x = 0
    $y = 0
    $farbe = 00000000
    $ispressed = True

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

    $hwnd = GUICreate("",500,500,@DesktopWidth/2-250,@DesktopHeight/2-250)
    GUISetState()
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hWnd)
    $hBitmap = _GDIPlus_BitmapCreateFromGraphics(500, 500, $hGraphic)
    $hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    _GDIPlus_Startup()
    While 1
    If _IsPressed(27) Then
    $ispressed = "up"
    EndIf
    If _ispressed(28) Then
    $ispressed = "down"
    EndIf
    If $ispressed = True Then
    For $farbe2 = 0 To 400
    $hbrush = _GDIPlus_BrushCreateSolid($farbe)
    _GDIPlus_GraphicsFillRect($hbuffer,$x,$y,50,50,$hbrush)
    If $ispressed = "up" Then $farbe = $farbe +1000
    If $ispressed = "down" Then $farbe = $farbe +1000
    Next
    $ispressed = False
    _GDIPlus_GraphicsDrawImageRect($hGraphic, $hBitmap, 0, 0, 500, 500)
    EndIf
    WEnd

    [/autoit]

    hab das startup an der falschen stelle gemacht problem geloest

    2 Mal editiert, zuletzt von manuel6000 (30. Juli 2011 um 22:19)