Beiträge von Ilse

  • Liste On TOP

    Schon wieder...
    Gui on Top ...das klappt.
    Aber wie kann ich eine Liste OnTop setzen.

    In diesem Beispiel wird die Liste
    immer in den Hintergrund gesetzt.

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>

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

    $oIE = _IECreateEmbedded()

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

    $Form1 = GUICreate("Form1", 1000, 800, 239, 155)
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 900, 700)
    $List1 = GUICtrlCreateList("", 432, 16, 185, 376)
    GUICtrlSetData(-1, "Tiere|Hilfe")
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUICtrlSetState(-1, $GUI_show)
    GUISetState(@SW_SHOW)
    _Start()

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

    _IELoadWait ($oIE)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    func _Start()

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

    $Web = "http://www.hunde.de"

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

    _IENavigate($oIE,$Web)

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

    EndFunc

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


    ;) Ilse

  • Hotkeyset An Aus

    Guten Morgen Marvin,

    genau so...

    mal eine Frage...
    If $ShowLV Then

    wieso kommt da nichts dahinter?
    ich meine If $ShowLV = ???
    was wird da geprüft?

    Das andere ist klar...

    ?( Ilse

  • Hotkeyset An Aus

    Hallo xXxProGamerxXx,

    mußte gestern wieder los...
    ja, den Link kenne ich bin aber nicht weitergekommen.

    Das würde mir schon helfen
    Also, F1 blendet Liste ein und erneut F1 blendet Liste aus...
    Meine If Versuche in der Funktion
    haben mich nicht weitergebracht!

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 625, 443, 192, 124)
    $List1 = GUICtrlCreateList("", 432, 16, 185, 376)
    GUICtrlSetData(-1, "Hilfe|Start")
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUICtrlSetState(-1, $GUI_HIDE)
    $Info = GUICtrlCreateLabel("Info", 16, 376, 57, 41)
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    HotKeySet("{ESC}", "Terminate")
    HotKeySet("{F1}", "Info")
    While 1

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

    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    Func Terminate()

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

    MsgBox(0,"Ende","Das Programm wird beendet")
    exit
    EndFunc

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

    Func Info()
    GUICtrlSetState($List1, $GUI_Show)
    ;if...

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

    EndFunc

    [/autoit]

    Key...Schaltet den Hotkey aus
    aber wie kann ich das als Ein und Ausschalter verwenden?

    Grüße
    Ilse

  • Hotkeyset An Aus

    Hallo,

    habe ein Problem mit meinen Hotkeys!

    Folgendes soll passieren wenn's endlich fertig ist....

    F1 blendet die Auswahl ein. Hilfe soll bereits markiert sein.
    Das Label Info soll den Eintrag anzeigen. Da komm ich nicht weiter...
    Kann man das per Index Nr. abragen? Also wenn die Listbox ziemlich voll ist...Eintrag 10...

    Dann soll bei erneutem drücken der F1 Taste (wenn die Auswahl getroffen wurde)
    die Listbox ausgeschaltet werden, sodaß man im Info Label sieht was gewählt wurde!

    Hier mal mein Code

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 625, 443, 192, 124)
    $List1 = GUICtrlCreateList("", 432, 16, 185, 376)
    GUICtrlSetData(-1, "Hilfe|Start")
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUICtrlSetState(-1, $GUI_HIDE)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    HotKeySet("{ESC}", "Terminate")
    ;HotKeySet("{F1}", "Hilfe")
    Global $Paused
    HotKeySet("{F1}", "TogglePause")
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    Func Terminate()
    If Guictrlread($List1) = "Hilfe" Then
    MsgBox(0,"Ende","Das Programm wird beendet")
    else
    Exit 0
    endif
    EndFunc

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

    Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
    sleep(100)
    GUICtrlSetState(-1, $GUI_Show)
    ToolTip('Script ist pausiert',0,0)
    WEnd
    ToolTip("")
    EndFunc

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

    Würde mich freuen, wenn das klappt.

    Liebe Grüße
    :( Ilse

  • Scrollbars zurücksetzen

    Hallo,

    ich habe ein Problem mit Scollbars.
    Wie kann man da die Werte setzen bzw. zurücksetzen

    Ich hätte gerne, daß Horizontal und Vertical bei 0 sind.

    Beispiel

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>

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

    $oIE = _IECreateEmbedded()

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

    $Form1 = GUICreate("Form1", 1000, 800, 239, 155)
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 900, 700)
    GUISetState(@SW_SHOW)
    _Start()

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

    _IELoadWait ($oIE)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    func _Start()

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

    $Web = "http://www.ebay.de"

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

    _IENavigate($oIE,$Web)

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

    EndFunc

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


    hier startet die Scrollbar richtig.
    Das Problem ist, daß manchmal bei anderen Seiten die Scrollbar
    in der Mitte ist.
    Beispiel:
    Ich habe 10 Tabs mit 10 Seiten.
    Jeder Tab hat eine andere Scrollbar-Position!
    Kann man das irgendwie beeinträchtigen?

    Grüße
    :( Ilse

  • Taste loslassen abfragen

    Hallo,

    folgendes Problem:
    Ich habe ein Hotkeyset erstellt.

    Wenn ich die Plustaste gedrückt halte
    dann wird hochgezählt. OK!

    Das Problem:
    Ich muß aber ermitteln wann die Taste losgelassen wurde!

    Hier mein Code

    Spoiler anzeigen
    [autoit]


    HotKeySet("{NUMPADADD}", "plus")
    HotKeySet("{NUMPADSUB}", "minus")

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

    Global $Start = 0

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

    While 1
    ;~ Sleep(100)
    WEnd

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

    func plus()

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

    ToolTip($Start)
    $Start += 1
    ;Msgbox(0,"","es wurde bei: "& $Start &" losgelassen")
    endfunc

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

    func minus()

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

    $Start -= 1
    ToolTip($Start)
    ;Msgbox(0,"","es wurde bei: "& $Start &" losgelassen")
    endfunc

    [/autoit]


    Liebe Grüße
    :( Ilse

  • Tab Abfrage

    Hallo zusammen,

    ich habe mal wiedr ein TAB Problem.
    In der Hilfe bin ich nicht weitergekommen.

    Folgendes:
    Wenn ich z.B. 10 oder 20 TABS fertig habe,
    wie kann ich ermitteln:

    1. Welcher TAB den Fokus hat (also nicht nur per Klick sondern auch per Tastatur)

    Also sobald irgend ein TAB aktiv ist (den Fokus hat) Msgbox z.B. TAB 4 aktviert!

    Hier mal das Script aus der Hilfe

    Spoiler anzeigen
    [autoit]


    #AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #include <GuiConstantsEx.au3>
    #include <GuiTab.au3>

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

    Opt('MustDeclareVars', 1)

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

    $Debug_TAB = False ; Check ClassName being passed to functions, set to True and use a handle to another control to see it work

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

    _Main()

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

    Func _Main()
    Local $hTab

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

    ; Create GUI
    GUICreate("Tab Control Get Current Focus", 400, 300)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296)
    GUISetState()

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

    ; Add tabs
    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")

    ; Get/Set current focus
    _GUICtrlTab_SetCurFocus($hTab, 1)
    MsgBox(4160, "Information", "Current Focus: " & _GUICtrlTab_GetCurFocus($hTab))

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

    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    EndFunc ;==>_Main

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

    Wenn ich z.B. 5 oder 20 Tabs ... habe
    müssen diese dann zuerst ermittelt werden???


    Liebe Grüße
    ;) Ilse

  • Zoom in Gui?

    Hallo,

    muß mich wieder melden.
    Ich zerbreche mir schon seit Stunden
    den Kopf wie ich das machen kann.

    1. Ich lege mehrere Tabs an
    2. und dann soll je Tab der Zoom nachträglich geändert werden.

    Also am Anfang haben alle TABS 100%
    Ich klicke dann auf TAB 3 und gebe für diesen TAB 200% ein.

    Eine Idee wie man sowas machen kann?

    huh...
    Liebe Grüße
    ;) Ilse

  • Zoom in Gui?

    Hallo nochmal,

    ich krieg das einfach nicht zum laufen.
    Brauch nochmal Hilfe!

    Also, dieses Beispiel funktioniert!

    Spoiler anzeigen
    [autoit]


    #include <IE.au3>
    $sLink="hunde.com"
    $iZoom = 200
    $oIE = ObjCreate("Shell.Explorer.2")
    GUICreate('Test', 700, 500)
    GUICtrlCreateObj($oIE, 5,5, 690, 490)
    GUISetState()
    $test = _IENavigate($oIE, "about:blank")

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

    _IEBodyWriteHTML($oIE, "<iframe style='zoom:" & $iZoom & "%' src='http://" & $sLink & "' width='100%' height='100%'>")
    While 1
    Sleep(10)
    Switch GUIGetMsg()
    Case -3
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Ich habe nun ein Script mit Arrays...
    und das klappt leider nicht!

    Spoiler anzeigen
    [autoit]


    #include<Array.au3>
    #include <IE.au3>
    #Include <GuiTab.au3>
    _IEErrorHandlerRegister ()

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

    $iZoom = 200
    Dim $oIE[1]
    ;$oIE[0] = _IECreateEmbedded()
    $oIE[0] = ObjCreate("Shell.Explorer.2")
    Dim $Tab[1]

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

    $gui = GUICreate("Browser",800,600)
    $NewTab = GUICtrlCreateButton("Neuer Tab",20,20,80,25)
    $input = GUICtrlCreateInput("",120,20,400,25)
    $TabParent = GUICtrlCreateTab(20,60,760,520)
    $Tab[0] = GUICtrlCreateTabItem("Tab")
    GUICtrlCreateObj($oIE[0],40,100,700,460)

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

    GUISetState()

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

    _IENavigate($oIE[0],"http://www.google.de")
    ;_IEBodyWriteHTML($oIE[0], "<iframe style='zoom:" & $iZoom & "%' src='http://" & $sLink & "' width='100%' height='100%'>")
    ;_IEBodyWriteHTML($oIE[0], "<iframe style='zoom:" & $iZoom & "%' src='http://www.google.de' width='100%' height='100%'>")

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

    GUICtrlSetData($input,_IEPropertyGet($oIE[0],"locationurl"))

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

    While GUIGetMsg()<>-3 * Sleep(10)
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    Case $NewTab
    $iIE = UBound($oIE)
    _ArrayAdd($Tab,GUICtrlCreateTabItem("Tab"&$iIE))
    _ArrayAdd($oIE,_IECreateEmbedded())
    GUICtrlCreateObj($oIE[$iIE],40,100,700,460)
    _IENavigate($oIE[$iIE],"http://www.google.de")
    Case $input
    $selected = GUICtrlRead($TabParent)
    _IENavigate($oIE[$selected],GUICtrlRead($input))
    WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))

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

    Case $TabParent
    $selected = GUICtrlRead($TabParent)
    WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))
    GUICtrlSetData($input,_IEPropertyGet($oIE[$selected],"locationurl"))
    EndSwitch
    WEnd

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

    Ich habe mal meine Versuche deaktiviert!

    Liebe Grüße
    :( Ilse

  • Zoom in Gui?

    Hallo,

    ich möchte gerne die Zoomfunktion
    in meiner Gui verwenden!

    Im IE ist das STRG +

    das geht aber in der Gui nicht!

    Gibt es da eine Möglichkeit?

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>
    $oIE = _IECreateEmbedded()

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

    $Form1 = GUICreate("Form1", 697, 520, 239, 155)
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 669, 493)
    GUISetState(@SW_SHOW)
    _Start()

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

    _IELoadWait ($oIE)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    func _Start()

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

    $Web = "http://www.hunde.de"

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

    _IENavigate($oIE,$Web)

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

    EndFunc

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

    Liebe Grüße
    ;) Ilse

  • ShellExecute Hide

    Hallo,

    hm, das geht leider nicht!

    [autoit]


    ShellExecute(@SystemDir & "\magnify.exe", -1, -1, -1, @SW_HIDE)

    [/autoit]


    Fehlermeldung:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    ...das geht auch nicht

    [autoit]


    Run(@SystemDir & "\magnify.exe", -1, @SW_HIDE)
    Sleep(1000)

    [/autoit]

    ...keine Fehlermeldung, ist aber auch nichts zu sehen.
    Das Programm ist nicht aktiv! Auch nicht mit @SW_Minimize....!!!!


    Grüße
    :( Ilse

  • ShellExecute Hide

    Hallo,

    folgendes Problem:
    Ich möchte ein externes Programm starten.

    Das klappt soweit.

    Meine Frage:
    Wie kann ich verhindern, daß das Fenster kurz erscheint?

    Mein Code:

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

    ShellExecute(@SystemDir & "\magnify.exe", "", "", "", @SW_HIDE) ; Fenster wird immr kurz angezeigt!!!!
    Sleep(1000)

    [/autoit]

    EDIT:

    Das geht auch nicht

    [autoit]


    Run(@SystemDir & "\magnify.exe", "", @SW_HIDE)
    Sleep(1000)

    [/autoit]


    :( Grüße Ilse

  • Exit Loop Wert anzeigen

    Hallo Veronesi,

    brauch vielleicht doch nochmal deine Hilfe.
    Ich möchte das ganze in eine Funktion packen!
    Das hat leider nicht geklappt.

    Toll wäre es, wenn ich per Hotkey die F11 Taste drücke
    alles startet und wenn F11 erneut gedrückt wird alles beendet wird.

    Spoiler anzeigen
    [autoit]


    Global $i, $bExitLoop = False
    HotKeySet("{ENTER}", "_Enter")
    HotKeySet("{F11}", "_Start")
    SplashTextOn("Auswahl", 1, 400, 400)

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

    Func _Start() ; hier startet die Funktion
    For $i = 1 To 20
    ControlSetText("Auswahl", "", "Static1", $i)
    _Sleep(2000)
    If $bExitLoop Then ExitLoop
    Next
    SplashOff()
    HotKeySet("{ENTER}")
    MsgBox(64, "Auswahl", "Sie haben die Nr. " & $i & " gewählt!")
    Exit
    EndFunc ;==>_Start

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

    Func _Enter()
    $bExitLoop = True
    EndFunc ;==>_Enter

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

    Func _Sleep($iTime)
    Local $Timer = TimerInit()
    Do
    Sleep(100)
    If $bExitLoop Then Return
    Until TimerDiff($Timer) >= $iTime
    EndFunc ;==>_Sleep

    [/autoit]

    Das geht leider so nicht!
    Huh bin die ganze Zeit schon am probieren...

    Hier ist nochmal dein Code

    Spoiler anzeigen
    [autoit]


    Global $i, $bExitLoop = False
    HotKeySet("{ENTER}", "_Enter")
    SplashTextOn("Auswahl", 1, 400, 400)

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

    For $i = 1 To 20
    ControlSetText("Auswahl", "", "Static1", $i)
    _Sleep(2000)
    If $bExitLoop Then ExitLoop
    Next
    SplashOff()
    HotKeySet("{ENTER}")
    MsgBox(64, "Auswahl", "Sie haben die Nr. " & $i & " gewählt!")
    Exit

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

    Func _Enter()
    $bExitLoop = True
    EndFunc ;==>_Enter

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

    Func _Sleep($iTime)
    Local $Timer = TimerInit()
    Do
    Sleep(100)
    If $bExitLoop Then Return
    Until TimerDiff($Timer) >= $iTime
    EndFunc ;==>_Sleep

    [/autoit]

    Liebe Grüße
    ;) Ilse

  • Exit Loop Wert anzeigen

    Hallo,

    habe heute folgendes Problem:
    Ich möchte per Loop z.B. 20 Nr. Vorschläge machen.

    z.B. so:

    Spoiler anzeigen
    [autoit]


    for $i = 1 to 20

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


    SplashTextOn ("Auswahl",$i,400,400)
    Sleep(2000)
    next
    SplashOff()

    [/autoit]

    Folgendes sollte nun passieren:
    Wenn ich mit Return bestätige, dann soll diese Nr.
    ermittelt werden und der Loop soll verlassen werden.

    z.B. Sie haben die Nr. 3 gewählt (exit Loop...)

    Würde mich über Tipps freuen,
    komme irgendwie nicht weiter...


    Liebe Grüße
    ;) Ilse

  • mousemove Problem

    Hallo Xor,

    was mich etwas verwirrt hat,
    MouseMove sieht man nicht.
    Den Wert kann man glaube ich verlangsamen. Das krieg ich hin.

    Für einen älteren Menschen ist das echt zu schnell.
    Noch ne Frage an dich:

    Ich weiß daß man den Mauszeiger in Windows größer machen kann.
    Gibt es da was in Autoit? Sobald Mousmove ausgelöst wird,
    wird der Mauszeiger groß.

    Liebe Grüße
    Ilse ;)
    nochmal DANKE