Beiträge von funkey

  • Button Hotkey

    Einfach ein & an die passende Stelle an die Beschriftung des Buttons hängen ;)

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    GUICreate("Button-Hotkey", 210, 80)

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

    GUICtrlCreateLabel("Please click a button!", 10, 10)
    $YesID = GUICtrlCreateButton("&Yes", 10, 50, 50, 20)
    $NoID = GUICtrlCreateButton("&No", 80, 50, 50, 20)

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

    GUISetState()

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

    Do
    $msg = GUIGetMsg()

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

    Select
    Case $msg = $YesID
    MsgBox(0, "You clicked on", "Yes")
    Case $msg = $NoID
    MsgBox(0, "You clicked on", "No")
    EndSelect
    Until $msg = $GUI_EVENT_CLOSE

    [/autoit]

    Siehe auch:

    [autoit]

    GUISetAccelerators

    [/autoit]

  • Schreibgeschwindigkeit drosseln ?1

    [autoit]

    Opt('SendKeyDelay', 100)

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

    Run("notepad")
    WinWaitActive("Unbenannt - Edi")
    Sleep(2000)
    Send("Dies ist ein Test" & @CRLF & "Jeder Fängt mal klein an")
    Sleep(3500)
    WinClose("Unbenannt", "")
    Send("{RIGHT}{ENTER}")
    Exit

    [/autoit]

  • DeskKey v 0.4

    Nettes Tool :thumbup: !!
    Du hast aber vergessen, dass manche Leute mehr als einen Bildschirm besitzen. Man kann zwar dort nichts auswählen, aber sollte dort sollte auch kein anderes Programm mehr zu sehen sein. Außerdem wird die Gui dann immer in den ersten Bildschirm geschoben.

  • TreeView nach links scrollen?

    Notdürftige Lösung:

    [autoit]

    Send('{Home}{LEFT}{RIGHT}')

    [/autoit]

    Vllt finde ich noch etwas anderes

    Edit: Hab es gerade am Explorer getester. Funktioniert wunderbar.

    [autoit]

    ControlSend('Explorer-Fenster', '', 'SysTreeView321', '{Home}{LEFT}{RIGHT}')

    [/autoit]

  • ListviewItem an run Übergeben

    Hab mir zwar nicht allles durchgelesen, aber vllt hilft dir das.

    Spoiler anzeigen
    [autoit]

    #cs **************************************************************************

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

    ListviewItem an run Übergeben

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

    http://www.autoit.de/index.php?page…6830#post106830

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

    #ce **************************************************************************

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

    #include <GuiListView.au3>
    #include <ListViewConstants.au3>
    #include <GuiConstantsEx.au3>

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

    GUICreate('ListView Get Item Text', 400, 300)
    $hListView = GUICtrlCreateListView('Hostname|BENUTZERNAME|SITZUNGSNAME', 2, 2, 394, 268, BitOR($LVS_REPORT, $LVS_SINGLESEL));hier erstellst du die Listview
    GUISetState()
    For $i = 0 To 9
    GUICtrlCreateListViewItem(Random(100, 999, 1) & '|' & Random(1000, 9999, 1) & '|' & Random(10000, 99999, 1), $hListView);hier die einträge
    Next
    $hButton = GUICtrlCreateButton('Alle SITZUNGSNAMEN anzeigen', 100, 275, 220, 22);Button ist klar
    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hButton
    $aSel = _GUICtrlListView_GetSelectedIndices($hListView, True)
    For $i = 1 To $aSel[0]
    $var1 = _GUICtrlListView_GetItemText($hListView, $aSel[$i], 0)
    $var2 = _GUICtrlListView_GetItemText($hListView, $aSel[$i], 2)
    MsgBox(0, "", $var1 & @CRLF & $var2)
    Next
    EndSwitch
    WEnd

    [/autoit]

  • µit - Juli

    Ja, ja, Geschwindigkeit ist eben alles :P:D !
    Gratulation Bugfix! :thumbup:

    Ich bin sicher, dass mittels einer Kombination der besten Teile jedes Skripts noch etwas mehr herauszuholen wäre.
    eukalyptus: Wie wirkt sich Oscar's Anpassung von Bugfix' Skript zeitlich aus?

  • Maus Kontrolle

    Hab's auch schnell probiert.

    Spoiler anzeigen
    [autoit]

    Global $aMousePos = MouseGetPos()

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

    While 1
    ToolTip(_MouseMoved($aMousePos))
    Sleep(100)
    WEnd

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

    Func _MouseMoved(ByRef $aMousePos)
    Local $ret, $aMousePos_new = MouseGetPos()
    If $aMousePos[0] <> $aMousePos_new[0] Or $aMousePos[1] <> $aMousePos_new[1] Then
    $ret = 1
    Else
    $ret = 0
    EndIf
    $aMousePos = $aMousePos_new
    Return $ret
    EndFunc

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

  • Dokument ausfüllen, *.rtf od. alternativen?

    So zum Beispiel ;)

    Spoiler anzeigen
    [autoit]

    #include <ScreenCapture.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    $hGui = GUICreate('Formular ausfüllen', 601, 852, -1, -1, $ws_popup)
    GUICtrlCreatePic('Gelbestellung.jpg', 0, 0, 601, 852, 0)

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

    GUICtrlCreateLabel('Produktname', 120, 180)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlCreateLabel('Bestelldatum', 420, 180)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlCreateLabel('Bestellt von', 120, 300)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlCreateLabel('Menge', 420, 300)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

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

    GUISetState()

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

    _ScreenCapture_CaptureWnd('Formular.jpg', $hGui)

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

    ;~ Do
    ;~ Until GUIGetMsg() = -3

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

    Das Ergebnis wird als Formular.jpg abgelegt.

  • Encrypter

    Nette Idee!
    war10ck: Die Idee dahinter glaube ich ist, dass man wenn man weiß wie es geht, den Code einfach so lesen kann ;)
    Außenstehende wissen damit nicht viel anzufangen. Es geht hierbei kaum um Sicherheit.

  • Combobox mit Button verknüpfen

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

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

    $Form_Mstsc = GUICreate("Remotedesktop Tool", 364, 36, -1, -1)
    $Button_GO = GUICtrlCreateButton("GO", 304, 8, 49, 22, 0)
    $Combo_Auswahl = GUICtrlCreateCombo("Bitte eine Auswahl treffen", 8, 8, 289, 25)
    GUICtrlSetData(-1, "Remote Root|Remote PC", "item3")
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button_GO
    $Auswahl = GUICtrlRead($Combo_Auswahl)
    Switch $Auswahl
    Case "Bitte eine Auswahl treffen"
    MsgBox(0, "", $Auswahl)
    ;~ run("C:\Programme\Icq6.5\icq.exe")
    Case "Remote Root"
    MsgBox(0, "", $Auswahl)
    ;~ run("C:\Programme\Icq6.5\icq.exe")
    Case "Remote PC"
    MsgBox(0, "", $Auswahl)
    ;~ run("C:\Programme\Icq6.5\icq.exe")
    EndSwitch
    EndSwitch
    WEnd

    [/autoit]