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

    Einmal editiert, zuletzt von Ilse (4. April 2012 um 19:37)

  • Mit "GUICtrlSetPos()" solltest du auch dein Input Feld dem entsprechend auch erweitern.. von alleine wird es nicht Größer ::P

    Gruß Marvin