Hallo,
nach etlichen Updates, ist es soweit, meine Skalierende MessageBox noch einmal vorzustellen.
Update: 18.07.2018
-Danke an: alpines und autoiter
Was kann die Message Box?
-So viele Buttons wie du möchtest.
-Die höhe skaliert mit dem Text den du eingibst. Wenn eine Line zu lang ist, verbreitert sich die messagebox.
-Autoclose-Timeout. (Sekunden werden im Titel angezeigt)
-Default Button festlegen.
- Button Timeout (Sekunden werden im Button angezeigt)
-Einstellen von:
-Button-Breite
-Button-Höhe
-Abstand zwischen den Buttons
-Abstand zwischen dem Rand der Box und dem ersten bzw. letzten Button
-Abstand zwischen dem unteren Rand und den Buttons.
-Abstand zwischen dem oberen Rand und dem Label bzw. Abstand zwischen dem ersten Button und dem unteren Rand des Labels.
-Hintergrundfarbe
-Transparenz
-Textfarbe
-Labelfarbe
-Buttonfarbe
-Icon
-Button/ Label Style.
-
Hier ist die UDF: ScalingMessageBox.au3
Hier mal was zum testen:
#include "ScalingMessageBox.au3"
Example1()
Exit
Func Example1() ;-> Simple Yes or No Box.
$PressedButton = _sMsgBox("Test", 4, "Continue?", "to=Yes,20;Icon=0;tr=20")
switch @extended
case 0 ;--> Message Box closed by User or Autoclose.
MsgBox(0, @extended, $PressedButton, 10)
case 1 ;--> Yes button pressed.
MsgBox(0, @extended, $PressedButton, 10)
case 2 ;--> No button pressed.
MsgBox(0, @extended, $PressedButton, 10)
EndSwitch
EndFunc
Alles anzeigen