Beiträge von Shortylaforge

  • autom. Refresh für 3rd Party Programm

    Dann mal konkreter... Lern ich das halt Pfftt.. :)

    Case $Menu_Program_Choose funktioniert in diesem Fall wegen der For Schleife ja nur beim letzten gelisteten Eintrag. Wie muss ich das umbauen das alle Einträge im Case erfasst und ausgewertet werden?

    Spoiler anzeigen
    [autoit]


    #include <File.au3>
    #include <Array.au3>
    #Include <GuiListBox.au3>

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

    Dim $array1,$main1,$list1

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

    $windows = WinList()
    $main1 = GUICreate("Auto Refresher",400,400,200,200)
    $Menu_Program = GUICtrlCreateMenu ("ChooseProgram")
    $Menu_Open = GUICtrlCreateMenu ("Open", $Menu_Program)

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

    For $i = 1 To UBound ($windows) - 1
    If $windows[$i][0] <> "" AND IsVisible($windows[$i][1]) Then
    $Menu_Program_Choose = GUICtrlCreateMenuItem ($windows [$i][0], $Menu_Open)
    EndIf
    Next

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

    GUISetState()

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

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case -3
    ExitLoop
    Case $Menu_Program_Choose
    MsgBox(0, "", "")
    EndSwitch
    WEnd

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

    Func IsVisible($handle)
    If BitAnd( WinGetState($handle), 2 ) Then
    Return 1
    Else
    Return 0
    EndIf
    EndFunc

    [/autoit]

  • autom. Refresh für 3rd Party Programm

    Da ist noch nichts, außer wie erstell ich mir nen Button/Liste und son Zeuchs.

    Also reiner Tutorial Kram, den wollt ihr doch nicht wirklich sehen, oder doch? :) Na gut.. Aber weit bin ich halt nicht gekommen. Kriege grad mal die offenen Fenster in ner Liste angezeigt,

    und auch das hab ich mir zusammengeklaubt ohne wirklich zu verstehen was da passiert.

    Spoiler anzeigen
    [autoit]


    #include <File.au3>
    #include <Array.au3>
    #Include <GuiListBox.au3>

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

    Dim $array1,$main1,$list1

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

    $windows = WinList()
    $main1 = GUICreate("Listfeld",400,400,200,200)
    $list1 = GUICtrlCreateList("",10,10,380,300)

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

    For $i = 1 To UBound ($windows) - 1
    If $windows[$i][0] <> "" AND IsVisible($windows[$i][1]) Then
    _GUICtrlListBox_AddString ($list1, $windows [$i][0])
    EndIf
    Next

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

    GUISetState()

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

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case -3
    ExitLoop
    EndSwitch
    WEnd

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

    Func IsVisible($handle)
    If BitAnd( WinGetState($handle), 2 ) Then
    Return 1
    Else
    Return 0
    EndIf
    EndFunc

    [/autoit]

  • autom. Refresh für 3rd Party Programm

    Hi zusammen,


    ich bin noch totaler AutoIT Neuling, hab aber auch keine konkrete Hilfe für mein Problem finden können um das kmplt. selbstständig anzugehen. Ich hoffe hier auf eure Erfahrung und Unterstützung dabei :).


    Problemstellung:

    Ein 3rd Party Tool benötigt einen per Shortcut ausgelösten Refresh, sonst erfolgt eine autom. Abmeldung und das nervt. Das Script muss teilweise anpassungsfähig sein.


    - Die Idee ist, sich alle offenen Fenster auflisten zu lassen (durch häufiges patchen ändert sich der Fenstername regelmäßig), um dann das richtige manuell auszuwählen.

    - Als verstellbare Variablen möchte ich den Refresh Intervall in Sekunden, und den Shortcut zum refreshen selbst einstellen können.

    - Das Tool soll im gleichen Refresh Intervall auch eine kurze minimale Mausbewegung machen um einem Policy gesteuertem Standby entgegenzuwirken.

    - Anschliessend soll das Tool wieder auf das vorherige aktive Fenster focussieren.


    Wenn das man so einfach wäre.


    VG,

    Shortylaforge