GUI automatisch an der Länge eines Labels anpassen

**Tweaky**

Hi,
ich habe eine GUI mit einem Label drinnen.

Wenn ich nun den Text des Labels ändere, soll sich die Breite der GUI automatisch vergößern oder verkleinern, je nach dem wie lang der Text des Labels ist.

Ist dies möglich???

Merci

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

AutoitSetOption("GUIResizeMode",802) ; bei Größenänderung der GUI, bleiben die Elemente unverändert

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

$Form1 = GUICreate("AForm1", 400, 100, -1, -1, $WS_SIZEBOX)
$Label1 = GUICtrlCreateLabel("", 350, 10, 2000, -1, BitOR($WS_BORDER, $SS_CENTERIMAGE))
$button = GUICtrlCreateButton("Labeltext ändern", 10, 10)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button
$xxx = InputBox("Labeltext ändern", "")
GUICtrlSetData($Label1, $xxx)
EndSwitch
WEnd

[/autoit]

leviathan

mh man könnte ja die Anzahl der Zeichen nehmen die in der ersten Zeile des Labels sind und diese dann mit einer Anzahl von Pixeln multipliziereren also halt für ein Zeichen so und so viele dann überprüfen wie viele und dann ausrechnen

**Xenobiologist**

Hi,

ja das ist möglich. Aber was soll es denn werden, wenn es fertig ist? Welcher Zweck steht dahinter? Willst du wirklich den Ablauf so lassen? Ich meine InputBox und danach resizen?

So long,

Mega

**Tweaky**

Habs mal leicht geändert.

Wenn ich auf den Button klicke, wähle ich einen Ordner aus.
Dieser soll dann im Label stehen

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

AutoitSetOption("GUIResizeMode",802) ; bei Größenänderung der GUI, bleiben die Elemente unverändert

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

$Form1 = GUICreate("AForm1", 400, 100, -1, -1, $WS_SIZEBOX)
$Label1 = GUICtrlCreateLabel("", 350, 10,1000, -1, BitOR($WS_BORDER, $SS_CENTERIMAGE))
$button = GUICtrlCreateButton("Labeltext ändern", 10, 10)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button
$ordner_download = FileSelectFolder("Bitte den Standardordner für die E-Mail Anhänge auswählen", "", 2)
GUICtrlSetData($Label1, $ordner_download)
EndSwitch
WEnd

[/autoit]

Will die GUI so klein wie möglich halten, deshalb soll sie immer angepasst werden.

Hat jemand ne Idee

trallala

Hi,

das problem ist, das nicht jeder buchstabe gleich gross ist (in pixel) sonst hätte man mittels stringen die anzahl der zeichen ermittelt und anschliessend einfach per winmove die gui breiter machen können.

**BugFix**

Dann verwende keine TrueType-Schrift, sondern z.B. Courier.
Da sind dann alle Zeichen in gleicher Breite

**Greenhorn**

GUICtrlSetResizing

Aus der Hilfe...

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

Opt("GUICoordMode", 2)
GUICreate ("My InputBox",190,114,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) ; start the definition
GUISetIcon ("Eiffel Tower.ico")

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

GUISetFont (8,-1,"Arial")

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

GUICtrlCreateLabel ("Prompt", 8,7) ; add prompt info
GUICtrlSetResizing (-1,$GUI_DOCKLEFT+$GUI_DOCKTOP)

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

$nEdit = GUICtrlCreateInput ("Default", -1,3,175,20,$ES_PASSWORD) ; add the input area
GUICtrlSetState ($nEdit,$GUI_FOCUS)
GUICtrlSetResizing ($nEdit,$GUI_DOCKBOTTOM+$GUI_DOCKHEIGHT)

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

$nOk = GUICtrlCreateButton ("OK",-1,3,75,24) ; add the button that will close the GUI
GUICtrlSetResizing ($nOk,$GUI_DOCKBOTTOM+$GUI_DOCKSIZE+$GUI_DOCKHCENTER)

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

$nCancel = GUICtrlCreateButton ("Annuler", 25,-1) ; add the button that will close the GUI
GUICtrlSetResizing ($nCancel,$GUI_DOCKBOTTOM+$GUI_DOCKSIZE+$GUI_DOCKHCENTER)

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

GUISetState () ; to display the GUI

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

; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop
Wend

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

Damit sollte es gehen, oder ?!

Gruß
Greenhorn

**Tweaky**

Greenhorn
damit hab ichs auch schon probiert.
Glaube aber, dass dies der falsche Befehl ist.

Laut der deutschen Hilfe

Code

Wenn ein GUI-Fenster in seiner Größe verändert wird, reagieren die darin enthaltenen Steuerelemente auf die Änderung - wie sie reagieren wird durch diese Funktion bestimmt.

Die GUI soll sich ja an dem Label anpassen und nicht umgekehrt

trallala

Hi,

meinst du in etwa so?
(Die Länge stimmt noch nicht (immer/ganz), etwas besseres habe ich nicht zu bieten) :comp1:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

AutoitSetOption("GUIResizeMode",802) ; bei Größenänderung der GUI, bleiben die Elemente unverändert

$Form1 = GUICreate("AForm1", 150, 100, @DesktopWidth/2, @DesktopHeight/2, $WS_SIZEBOX)
$Label1 = GUICtrlCreateLabel("", 150, 20,1000, -1, BitOR($WS_BORDER, $SS_CENTERIMAGE))
GUICtrlSetFont ($Label1,10, "Courier")
$button = GUICtrlCreateButton("Labeltext ändern", 10, 10)
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button
$ordner_download = FileSelectFolder("Bitte den Standardordner für die E-Mail Anhänge auswählen", "", 2)
$laenge=StringLen ($ordner_download)
WinMove($Form1, "",@DesktopWidth/2-$laenge/2,@DesktopHeight/2,150+($laenge*7),100)
GUICtrlSetData($Label1, $ordner_download)
EndSwitch
WEnd

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

MfG
trallala

**Tweaky**

Perfekt,
danke dir genau so solls sein

War ja einfacher als ich gedacht habe :comp1: