Guten Tag,
gibt es eine Alternative zur Messagebox oder kann man sie auch designen?
Gibt es sonst auch noch andere Möglichkeiten, eine Messagebox nachzumachen?
Danke im voraus.
Guten Tag,
gibt es eine Alternative zur Messagebox oder kann man sie auch designen?
Gibt es sonst auch noch andere Möglichkeiten, eine Messagebox nachzumachen?
Danke im voraus.
Klar mach doch einfach eine GUI. Es gibt allerdings auch schon eine Funktion dafür... Benutz halt mal Google oder die Forensuche, das Thema müsste es hier schon öfters gegeben haben.
Kannst auch "Designen" - mit Vorschau!
Im SciTE einfach STRG + W drücken - oder aus dem Menü Extras den "Code Wizard".
Der hat unter anderem einen "MessageBox" Designer.
Habe ich auch nur mehr per Zufall gefunden
Mit dem Code Wizzard kann man aber nicht wirklich etwas am grundlegenden Design machen, da stehen nur die Parameter der Standard msgbox zur Verfügung. Wenn man wirklich eine individuelle msgbox möchte z.B. mit eigenen Namen für die Buttons muss man wie schon erwähnt wurde eine eigene gui dafür verwenden. Hatte mir sowas mal gabstelt, weil ich ein Edit Feld in der msgbox haben wollte und sich die Funktion inputbox() dafür nicht geeignet hat:
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
$frage = errorBox("Example", "Exampletext", "ExampleString1", "ExampleString2")
if $frage = 1 Then
ConsoleWrite(@CRLF & "Es wurde Ja gedrückt" & @CRLF)
Else
ConsoleWrite(@CRLF & "Es wurde Nein gedrückt" & @CRLF)
EndIf
Func errorBox($title,$text,$string1,$string2,$breite=600,$hoehe=200)
Local $eb_gui = GUICreate($title,$breite,$hoehe,-1,-1,$WS_CAPTION+$WS_SYSMENU+$WS_POPUP)
Local $eb_label = GUICtrlCreateLabel($text,10,20,580,40)
Local $eb_edit = GUICtrlCreateEdit("ALT: " & $string1 & @CRLF & "NEU: " & $string2,10,$hoehe-130,580,55,$WS_HSCROLL+$ES_READONLY)
Local $eb_ja = GUICtrlCreateButton("Ja",$breite-110,$hoehe-50,90,30)
Local $eb_nein = GUICtrlCreateButton("Nein",$breite-220,$hoehe-50,90,30)
GUICtrlSetFont($eb_label,9,600)
GUICtrlSetFont($eb_edit,8.5,400,"","Courier New")
GUICtrlSetBkColor($eb_edit,0xFFFFFF)
GUISetState()
[/autoit] [autoit][/autoit] [autoit]While 1
$eb_msg = GUIGetMsg()
Switch $eb_msg
Case $eb_ja
GUIDelete($eb_gui)
return 1
Case $eb_nein
GUIDelete($eb_gui)
return -1
Case $GUI_EVENT_CLOSE
GUIDelete($eb_gui)
return -2
EndSwitch
WEnd
EndFunc