Beiträge von Ilse

  • GuiCtrlGetFocus?

    Hallo,

    ich muß prüfen ob ein Objekt den Fokus hat.
    Das klappt aber nicht!

    Beispiel

    Spoiler anzeigen
    [autoit]


    #include <ComboConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 625, 443, 192, 124)
    $Input1 = GUICtrlCreateInput("Input1", 104, 192, 321, 21)
    $Combo1 = GUICtrlCreateCombo("Combo1", 104, 88, 145, 25)
    $Label1 = GUICtrlCreateLabel("Fokus", 112, 272, 33, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

    EndSwitch
    WEnd

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

    Mach mir schon die ganze Zeit das Leben schwer...

    Also, wenn Input den Fokus hat, dann z.B. Labeltext ist Input-Fokus
    Wenn Combo den Fokus hat...

    Grüße
    Ilse :(

  • Inputbox

    Hallo,

    die Schriftgröße meiner Inputbox
    soll stufenlos vergrößert werden. (Numpad +)

    Klappt leider nur teilweise.
    Die Box vergrößert sich nicht mit

    Mein Code

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    HotKeySet("{NUMPADADD}", "plus")

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

    Global $FontSize = 18
    Global $txtSuche
    $McCanyon = GUICreate("Size", 625, 443, 192, 124, BitOR($WS_MAXIMIZEBOX,$WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_OVERLAPPEDWINDOW,$WS_TILEDWINDOW,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_BORDER,$WS_CLIPSIBLINGS))
    GUISetBkColor(0xFFFBF0)
    $txtSuche = GUICtrlCreateInput("", 200, 272, 281, 45)
    GUICtrlSetFont(-1, 24, 800, 0, "Arial")
    GUICtrlSetColor(-1, 0x000000)
    GUICtrlSetResizing(-1, $GUI_DOCKAUTO+$GUI_DOCKLEFT+$GUI_DOCKRIGHT)
    GUISetState(@SW_SHOW)

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

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

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

    EndSwitch
    WEnd

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

    func plus()

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

    $FontSize +=4
    GUICtrlSetFont($txtSuche, $FontSize )

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

    endfunc

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

    Wie kann man die Box mitvergrößern?

    Grüße
    Ilse

  • Winmove keine Reaktion

    Hallo Misterspeed,

    hm... bei mir tut sich absolut nichts!
    Win7 64 bit...

    Zitat


    wäre aber nett gewesen zu erwähnen....


    tut mir leid Misterspeed hätte ich natürlich gemacht, aber
    wie gesagt, da tut sich nichts.

    Wollte nur eine bestimmte Größe des Fensters einstellen,
    und das geht bei mir leider nicht!
    Weiß jemand warum?

    :( Ilse

  • Winmove keine Reaktion

    Hallo,

    keine Ahnung woran es liegen kann.
    Bekomme Winmove nicht zum laufen.

    Es sollte die Fenstergröße fest eingstellt werden

    [autoit]


    ShellExecute(@WindowsDir&"\system32\osk.exe")
    Sleep(2000)

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

    Msgbox(0,"","Die Größe wird nun geändert")

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

    ;WinMove("[CLASS:OSKMainClass]", "", Default, Default, 1000, 500)
    WinMove("Bildschirmtastatur", "", Default, Default, 1000, 500)

    [/autoit]

    ;) Grüße Ilse

  • Combobox div. Fragen

    Hallo,

    ich habe ein paar Fragen zur Combobox:
    Fange mal an:

    1. Wie kann ich die Combobox automatisch öffnen? Auf + Zuklappen
    2. Ich lese den Inhalt der Combobox mit GuiCtrlRead beim Wechsel. OK!
    Aber wie kann ich den Wert auslesen indem ich zuerst wähle und bei Return z.B. die Msgbox bekomme.

    Beispiel:
    Combobox sollte aufgeklappt erscheinen.
    Ich wähle per Pfeiltaste STARTE aus und drücke dann die Returntaste.

    Mein Script

    Spoiler anzeigen
    [autoit]


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

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

    $Form1 = GUICreate("Form1", 347, 176, 192, 124)
    $Combo1 = GUICtrlCreateCombo("Auswahl", 80, 22, 145, 25)
    GUICtrlSetData(-1, "Meldung|Starte")
    GUISetState(@SW_SHOW)

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

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

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

    Case $Combo1
    _Menu1()
    EndSwitch
    WEnd

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

    Func _Menu1()
    Switch GUICtrlRead($Combo1)
    Case "Meldung"
    MsgBox(0,"","Info")
    Case "Starte"
    MsgBox(0,"","Das Programm startet")

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

    EndSwitch
    endfunc

    [/autoit]


    Viele Grüße
    ;) Ilse

  • Position Problem

    Hallo,

    sorry, konnte mich erst heute wieder melden.
    Ich hatte eine schwere Grippe.
    ...Noch nicht 100% da...

    Also, ich wollte das Script so aufbauen:

    Die Liste sollte im Tab sein.
    Das habe ich nicht geschafft.

    Hier mal mein Beispiel:

    Spoiler anzeigen
    [autoit]


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

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

    Global $xSizeMain = 1000, $ySizeMain = 800
    Global $xPosMain = -1, $yPosMain = -1
    Global $xSizeChild = 200, $ySizeChild = 400
    Global $xPosChild = $xSizeMain - $xSizeChild - 25, $yPosChild = -5
    Global $ShowChild = True

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

    Dim $oIE[1]
    $oIE[0] = _IECreateEmbedded()
    Dim $Tab[1]

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

    $gui = GUICreate("Browser",800,600)

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

    $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]

    _IENavigate($oIE[0],"http://www.hunde.de")

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

    While GUIGetMsg()<>-3 * Sleep(10)
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit

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

    Case $TabParent
    $selected = GUICtrlRead($TabParent)
    WinSetTitle($gui,"",_IEPropertyGet($oIE[$selected],"locationname"))

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

    EndSwitch
    WEnd

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

    ;~ Func _OnResize($hwnd, $iMsg, $iwParam, $ilParam)
    ;~ If $hwnd = $Form1 Then
    ;~ Local $Width = BitAND($ilParam, 0xFFFF)
    ;~ Local $Height = BitShift($ilParam, 16)
    ;~ Local $aPos = WinGetPos($Form1)

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

    ;~ GUICtrlSetPos($Browser, 0, 0, $Width, $Height) ;Change size of Browser Object

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

    ;~ WinMove($hChild, "", $aPos[0] + $aPos[2] - $xSizeChild - 28, $aPos[1] + 30)
    ;~ If $ShowChild And ($Width < $xSizeChild Or $Height < $ySizeChild) Then
    ;~ WinSetState($hChild, "", @SW_HIDE)
    ;~ $ShowChild = False
    ;~ EndIf
    ;~ If Not $ShowChild And $Width >= $xSizeChild And $Height >= $ySizeChild Then
    ;~ WinSetState($hChild, "", @SW_SHOW)
    ;~ $ShowChild = True
    ;~ EndIf
    ;~ EndIf
    ;~ Return $GUI_RUNDEFMSG
    ;~ EndFunc

    [/autoit]

    Hoffe Ihr habt eine Lösung.

    Liebe Grüße
    ;) Ilse

  • Position Problem

    merci nochmal für den Tip Greenhorn.

    Bin gerade dabei die Position der Child Gui anzupassen.
    Wo kann ich den Wert von oben und links und rechts angeben?

    Bin gerade etwas verwirrt...
    Ich meine, daß die kpl. Gui mit Liste (und eingestellter Größe)
    z.B. Links und z.B. von oben 80 Pixel erschent.

    ;) Liebe Grüße
    Ilse

  • Position Problem

    Hallo Greenhorn,

    schön daß du dich wieder gemeldet hast.
    Folgendes:
    Beim Start ist die Gui oben. Das ist ok.
    Du kannst auch das Hauptfenster "bewegen" geht auch...
    Die Gui ist drin...!
    Aber mach mal folgendes:
    Verändere in der Hauptgui unten rechts mal die Größe des Fensters! Ganz klein

    Dann ist plötzlich die 2. Gui außerhalb.
    Und das sollte nicht sein.

    ;) Grüße Ilse

  • Gui Resize

    Hallo Bulli IT

    merci für die Hilfe!
    Genau so dachte ich.
    Aber wie kann man noch die Größe
    der Schrift mitverändern?

    Hab was eingebaut, aber das geht nicht!

    Spoiler anzeigen
    [autoit]


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

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

    Global $guix = 228 ; breite der gui
    Global $guiy = 237 ;höhe der gui
    Global $listx = 153 ; x pos von list
    Global $listy = 188 ; y pos von list
    HotKeySet("{NUMPADADD}", "plus")

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

    $Form1 = GUICreate("Form1", $guix, $guiy, 192, 124,$WS_SIZEBOX ) ;du kannst die letzten beiden parameter weglassen dan geht das fenster in der mitte des bildschirmes auf
    $List1 = GUICtrlCreateList("", 32, 24, $listx, $listy)
    GUICtrlSetData(-1, "Hilfe|Info")
    GUISetState(@SW_SHOW)
    $Start = 10

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

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

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

    EndSwitch
    Sleep(50)
    WEnd

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

    func plus()
    $Start += 10

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

    GUICtrlSetFont($list1,$Start)
    $guix += 10 ; größe bei allen + 10
    $guiy += 10
    $listx += 10
    $listy += 10
    $pos = WinGetPos("Form1") ; abfrage wo die gui sich auf dem bildschirm befindet

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

    WinMove("Form1", "", $pos[0], $pos[1], $guix, $guiy) ; setzt die gui an die gleiche position wie vorher jedoch mit einer anderen größe
    GUICtrlSetPos( $Form1, 32, 24, $listx, $listy) ; vergrößert die list

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

    endfunc

    [/autoit]

    Das mit der Maus hab ich eingebaut.
    Aber die Vergrößerung mit der Taste stimmt leider noch nicht so ganz.
    Die Schriftgröße stimmt irgendwie nicht.

    ;)Grüße Ilse

  • Gui Resize

    Hallo,

    ich probiere schon seit 2 Tagen
    dieses Problem zu lösen:

    Ich möchte mit der + Taste (NumPAD)
    die Gui mit Inhalt vergrößern.

    Also, wenn die Gui zu klein wird, dann soll sich sich
    erweitern.

    Mein Code:

    Spoiler anzeigen
    [autoit]


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

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

    Global $Start = 10
    HotKeySet("{NUMPADADD}", "plus")

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

    $Form1 = GUICreate("Form1", 228, 237, 192, 124)
    $List1 = GUICtrlCreateList("", 32, 24, 153, 188)
    GUICtrlSetData(-1, "Hilfe|Info")
    GUISetState(@SW_SHOW)

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

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

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

    EndSwitch
    WEnd

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

    func plus()

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

    $Start += 10

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

    GUICtrlSetFont($List1,$Start)

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

    endfunc

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

    Hoffe Ihr habt da eine Lösung

    ;) Ilse

  • Position Problem

    Hallo, Greenhorn,

    hm... das klappt leider nicht.
    Konnte mich gestern nicht mehr melden.

    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, BitOR($WS_MAXIMIZEBOX,$WS_CLIPCHILDREN, $WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_OVERLAPPEDWINDOW,$WS_TILEDWINDOW,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_BORDER,$WS_CLIPSIBLINGS))
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 900, 700)
    $hChild = GUICreate("", 185, 376, 432, 16, $WS_POPUP, $Form1)
    $List1 = GUICtrlCreateList("", 0, 0, 185, 376)
    GUICtrlSetData(-1, "Tiere|Hilfe")
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUICtrlSetState(-1, $GUI_show)
    GUISetState(@SW_SHOW, $Form1)
    GUISetState(@SW_SHOW, $hChild)
    ;GUISetState(@SW_MAXIMIZE, $Form1)
    _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()
    $Web = "http://www.hunde.de"
    _IENavigate($oIE, $Web)
    EndFunc ;==>_Start

    [/autoit]

    Das Child Fenster wird abgdeckt!

    :( Ilse

  • Schriftgröße in Menü

    Hallo,

    ich möchte gerne die Schriftgröße
    meines Menüs anpassen.
    GuictrlSetFont geht leider nicht.

    Beispiel:

    Spoiler anzeigen
    [autoit]


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

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 625, 443, 192, 124)
    $MenuItem2 = GUICtrlCreateMenu("MenuItem2")
    $MenuItem5 = GUICtrlCreateMenuItem("MenuItem5", $MenuItem2)
    $MenuItem4 = GUICtrlCreateMenu("MenuItem4", $MenuItem2)
    $MenuItem6 = GUICtrlCreateMenuItem("MenuItem6", $MenuItem4)
    $MenuItem3 = GUICtrlCreateMenuItem("MenuItem3", $MenuItem2)
    $MenuItem1 = GUICtrlCreateMenu("MenuItem1")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    GUICtrlSetFont($MenuItem2,40)

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

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

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

    EndSwitch
    WEnd

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

    In der Gui läßt sich die Größe anpassen.
    Nur im Menü nicht.

    :( Grüße Ilse

  • Position Problem

    Hallo,

    ich habe ein Poblem mit meinr GUI.

    Wie kann man die 2. Gui
    in die 1. Gui größenabhängig integrieren.

    Das Problem ist,
    wenn ich die Hauptgui in der Größe ändere
    dann verschiebt sich die 2. Gui außerhalb des Hauptfensters
    Das sollte nicht passieren.
    Es sollte alles in einer Gui sein:

    Mein Code

    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, BitOR($WS_MAXIMIZEBOX,$WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_OVERLAPPEDWINDOW,$WS_TILEDWINDOW,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_BORDER,$WS_CLIPSIBLINGS))
    $Browser = GUICtrlCreateObj($oIE, 16, 16, 900, 700)
    $hChild = GUICreate("", 185, 376, 432, 16, $WS_POPUP, $WS_EX_TOOLWINDOW + $WS_EX_MDICHILD, $Form1)
    $List1 = GUICtrlCreateList("", 0, 0, 185, 376)
    GUICtrlSetData(-1, "Tiere|Hilfe")
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    GUICtrlSetState(-1, $GUI_show)
    GUISetState(@SW_SHOW, $Form1)
    GUISetState(@SW_SHOW, $hChild)
    ;GUISetState(@SW_MAXIMIZE, $Form1)
    _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()
    $Web = "http://www.hunde.de"
    _IENavigate($oIE, $Web)
    EndFunc ;==>_Start

    [/autoit]

    :( Grüße Ilse

  • Delete PopUp Fenster

    hallo zusammen,

    Ich habe folgendes Problem:
    wenn ich im Internet mehrere Links aufrufe
    dann werden jede Menge Pop-up-Fenster geöffnet.
    Beispiel ohne Popups...

    Spoiler anzeigen
    [autoit]


    #include <IE.au3>
    $oIE = _IECreate ("www.autoitscript.com")
    Sleep(5000)
    _IENavigate ($oIE, "http://www.autoitscript.com/forum/index.php?")
    Sleep(5000)
    _IENavigate ($oIE, "http://www.autoitscript.com/forum/index.php?showforum=9")

    [/autoit]


    ich weiß, es gibt Pop-up Blocker.
    Aber,gibt es auch eine Möglichkeit mit Autoit?
    Ist es irgendwie möglich, dass wenn meinen Gui geschlossen wird alle ieframes
    geschlossen werden?
    Also, daß keine 20 Explorer-Popups bleiben?

    ;) Ilse