Beiträge von name22

  • MP3 mittels YouTube downloaden

    Durch die Existenz dieser Programme wird das Ganze trotzdem nicht eindeutig legal.
    Aber da es keine wirkliche Einigung zu geben scheint was die Rechtslage betrifft kann das den Benutzern dieses Programms auch völlig egal sein, es sei denn ihre moralische Einstellung lässt das nicht zu :D

  • GUI eines Musik Makers erstellen

    Drag & Drop Box in GDI+:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GDIPlus.au3>
    #include <Misc.au3>

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

    Opt("MouseCoordMode", 2)

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

    $hWnd = GUICreate("BoxTest", 400, 400)
    GUISetState()

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

    _GDIPlus_Startup()

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

    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hWnd)
    $hBitmap = _GDIPlus_BitmapCreateFromGraphics(400, 400, $hGraphic)
    $hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
    _GDIPlus_GraphicsSetSmoothingMode($hBuffer, 2)
    _GDIPlus_GraphicsClear($hGraphic, 0xFFFFFFFF)

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

    Global $iX1 = 50
    Global $iY1 = 50

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

    AdlibRegister("_DrawBox", 30)

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

    While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
    Case $GUI_EVENT_CLOSE
    AdlibUnRegister()
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_GraphicsDispose($hBuffer)
    _GDIPlus_BitmapDispose($hBitmap)
    _GDIPlus_Shutdown()
    Exit
    Case $GUI_EVENT_PRIMARYDOWN
    If $nMsg[3] >= $iX1 And $nMsg[3] <= $iX1 + 100 And $nMsg[4] >= $iY1 And $nMsg[4] <= $iY1 + 50 Then
    $DistanceX = $nMsg[3] - $iX1
    $DistanceY = $nMsg[4] - $iY1
    While _IsPressed("01")
    $iX1 = MouseGetPos(0) - $DistanceX
    $iY1 = MouseGetPos(1) - $DistanceY
    WEnd
    EndIf
    EndSwitch
    WEnd

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

    Func _DrawBox()
    _GDIPlus_GraphicsClear($hBuffer, 0xFFFFFFFF)
    _GDIPlus_GraphicsFillRect($hBuffer, $iX1, $iY1, 100, 50)
    _GDIPlus_GraphicsDrawImageRect($hGraphic, $hBitmap, 0, 0, 400, 400)
    EndFunc

    [/autoit]

  • In ner FUNC n GuiCtrlRead

    Das tut er doch auch.
    Hier ein bisschen korriegiert:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #region ### START Koda GUI section ### Form=

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

    $Form1 = GUICreate("Form1", 633, 447, 188, 122)
    $Input1 = GUICtrlCreateInput("Input1", 92, 60, 169, 21)
    $Button1 = GUICtrlCreateButton("Button1", 96, 204, 37, 45, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _MsgBox()
    EndSwitch
    WEnd

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

    Func _MsgBox()
    MsgBox(1, "GuiCtrlRead", GUICtrlRead($Input1))
    EndFunc ;==>_MsgBox

    [/autoit]


    Edit: Zu spät :(
    Es gibt wohl keinen schnelleren Support als AutoIt.de :D
    Edit2: So jetzt stimmts, auch wenn es sowieso schon gelöst ist.

  • Bestimmte eingaben

    Mit WinSetTitle kann man kein GUI erzeugen ;)
    Erzeuge doch einfach ein Fenster mit GUICreate("AlphaMatch Game Tool - Eingeloggt als "&$sName, "Breite", "Höhe") NACHDEM die Variable $sName deklariert wurde.

  • Bestimmte eingaben

    So?

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    Global $aZugang[8][2] = [ _
    ['ThePierre', 'Test'], _
    ['User2', 'Test2'], _
    ['User3', 'Test3'], _
    ['User4', 'Test4'], _
    ['User5', 'Test5'], _
    ['User6', 'Test6'], _
    ['User7', 'Test7'], _
    ['User8', 'Test8']]

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

    Global $bPWD_OK = False, $iTry = 0

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

    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("AlphaMatch Game Tool", 251, 127, -1, -1)
    GUISetIcon("D:\008.ico")
    $name = GUICtrlCreateInput("", 8, 40, 233, 21)
    $passwort = GUICtrlCreateInput("", 8, 64, 233, 21, BitOR($ES_PASSWORD, $ES_AUTOHSCROLL))
    $ButtonOk = GUICtrlCreateButton("&OK", 86, 96, 75, 25, 0)
    $ButtonCancel = GUICtrlCreateButton("&Cancel", 167, 96, 75, 25, 0)
    $EnterPassLabel = GUICtrlCreateLabel("Enter password and you Name", 8, 12, 149, 17)
    GUISetState(@SW_SHOW, $Form1)
    #endregion ### END Koda GUI section ###

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

    While ($iTry < 5) And Not $bPWD_OK
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $ButtonOk
    $iTry += 1
    For $i = 0 To UBound($aZugang) - 1
    If $aZugang[$i][0] = GUICtrlRead($name) Then
    If $aZugang[$i][1] = GUICtrlRead($passwort) Then
    $bPWD_OK = True
    $user = $aZugang[$i][0]
    ExitLoop
    Else
    GUICtrlSetData($passwort, "")
    EndIf
    EndIf
    Next
    EndSwitch
    WEnd
    GUIDelete($Form1)
    If $bPWD_OK Then
    MsgBox(32, "Found", "Deine Account Daten wurden gefunden!" & @CRLF & "Eingeloggt als: " & $user)
    Else
    MsgBox(32, "Not Found", "Deine Account Daten wurden nicht gefunden!")
    EndIf

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

    ;ab hier kannst du dann deine weiteren Guis einbinden

    [/autoit]


    Edit: Zu spät :rolleyes:
    autoBert: Fehlt da nicht was? [/autoit

  • Fehler

    In der aktuellen deutschen Hilfedatei ist ein Fehler bei ControlCommand(). Dort steht immer noch, dass WinActive() zu verwenden ist um das Fenster zu aktivieren. WinActive gibt nur den Status zurück und WinActivate ändert ihn. In der Online Hilfe wurde (glaube ich) schon korrigiert, aber in der Hilfedatei noch nicht. Ist jetzt kein schwerwiegender Fehler, aber man könnte es ja mal ändern ;)
    Kann es sein, dass der Fehler auch in der Englischen Hilfe noch existiert?