Beiträge von Teare


    Bei mir ( Im SciTE ) Wird er direkt angezeigt :)

    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    $hGUI = GUICreate('TOPMOST',350,200,-1,-1,BitOR($WS_POPUP,$WS_BORDER))
    $check=GUICtrlCreateCheckbox('Always on Top',5,5,120,30)
    GUISetState()
    While 1
    Switch GUIGetMsg()
    Case -3
    ExitLoop
    Case $check
    If GUICtrlRead($check) = $GUI_CHECKED Then
    WinSetOnTop ( "T", "", 1 )
    Else
    WinSetOnTop ( "T", "", 0 )
    EndIf
    EndSwitch
    WEnd

    #include <GUIConstantsEx.au3>
    ;Main GUI
    $hWnd_Main = GUICreate("Form1", 459, 74, 192, 124)
    $Open2nd1 = GUICtrlCreateButton("Open 2nd GUI Hide Mode", 8, 8, 443, 25)
    $Open2nd2 = GUICtrlCreateButton("Open 2nd GUI Disable Mode", 8, 40, 443, 25)
    GUISetState(@SW_SHOW)
    ;Sub GUI - Erstellen und verstecken
    $hWnd_Sub = GUICreate("Form1", 268, 42, 192, 124)
    $hBtn_Close = GUICtrlCreateButton("Close", 8, 8, 251, 25)
    GUISetState(@SW_HIDE)


    While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
    Case $Open2nd1
    GUISetState(@SW_SHOW,$hWnd_Sub)
    GUISetState(@SW_HIDE,$hWnd_Main)
    GUISwitch($hWnd_Sub)
    $mode = 0
    Case $Open2nd2
    GUISetState(@SW_SHOW,$hWnd_Sub)
    GUISetState(@SW_DISABLE,$hWnd_Main)
    GUISwitch($hWnd_Sub)
    $mode = 1
    Case $GUI_EVENT_CLOSE,$hBtn_Close
    Switch $nMsg[1]
    Case $hWnd_Main
    Exit
    Case Else
    If $mode = 0 Then
    GUISetState(@SW_SHOW,$hWnd_Main)
    GUISetState(@SW_HIDE,$nMsg[1])
    GUISwitch($hWnd_Main)
    ElseIf $mode = 1 Then
    GUISetState(@SW_ENABLE,$hWnd_Main)
    GUISetState(@SW_HIDE,$nMsg[1])
    GUISwitch($hWnd_Main)
    EndIf
    EndSwitch


    EndSwitch


    WEnd

    Hey . ich habe eine frage. Ich möchte dass wenn mann eine bestimmte Reihenfolge an buttons drückt etwas passiert.


    Wie ein Cheatcode sozusagen.


    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("KK", 160, 88, 192, 124)
    $Label1 = GUICtrlCreateButton("up", 28, 8, 40, 24)
    $Label2 = GUICtrlCreateButton("down", 28, 56, 40, 24)
    $Label3 = GUICtrlCreateButton("left", 8, 32, 40, 24)
    $Label4 = GUICtrlCreateButton("right", 56, 32, 40, 24)
    $Label5 = GUICtrlCreateButton("a", 104, 56, 40, 24)
    $Label6 = GUICtrlCreateButton("b", 112, 32, 40, 24)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###


    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Label1
    ConsoleWrite("UP")
    Case $Label2
    ConsoleWrite("DOWN")
    Case $Label3
    ConsoleWrite("LEFT")
    Case $Label4
    ConsoleWrite("RIGHT")
    Case $Label5
    ConsoleWrite("A")
    Case $Label6
    ConsoleWrite("B")
    EndSwitch
    WEnd

    ;Habe folgende Opt. ausprobiert, obs vielleicht daran liegt:;AutoItSetOption("MouseCoordMode", 1)
    ;AutoItSetOption("GUICoordMode", 1)


    Dim $cordinates = PixelSearch( 50, 300, 10030, 750, 0xDD1717, 10, 2)
    If Not @error Then
    $xmous = MouseGetPos(0)
    $ymous = MouseGetPos(1)



    MouseMove($xcord ,$ycord , 10)
    EndIf


    Das mit dem "MouseGetPos" kannst du vereinfachen.:


    ;Habe folgende Opt. ausprobiert, obs vielleicht daran liegt:;AutoItSetOption("MouseCoordMode", 1)
    ;AutoItSetOption("GUICoordMode", 1)


    Dim $cordinates = PixelSearch( 50, 300, 10030, 750, 0xDD1717, 10, 2)
    If Not @error Then
    $Pos = MouseGetPos()
    MouseMove($Pos[0] ,$Pos[1] , 10)
    EndIf



    MfG

    Soo :)


    Ich habe den fehler gefunden.


    ich hatte in einer permanenten schleicfe ( AdlibRegister ) die Funktion WInSetTrans.


    Deswegen hat es komischerweise bei Win XP und wenn Aero aus war geflackert nun ists weg :) trotzdem danke :D

    Hey liebe AutoIT Freunde. Und zwar habe ich ein Problem mit meinem Downloader.
    Und zwar wenn Windows Vista's/7's Aero aus ist, flackert das Programm
    Bei Win XP genau das selbe.
    Da ich den "Source" eigendlich nicht veröffentlichen will (Spoiler) vergebe ich ihn nur an "vertrauten" Personen via PN.
    Um selber das Problem zu testen :
    http://lthd.de/downloads/LtHD-Setup.exe



    Der Ganze Downloader Basiert auf diesem Script :