Input dynmisch verwalten? (Passwort)

[autoit]

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <SendMessage.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Input mit Passwort", 361, 131, 193, 125)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Label1 = GUICtrlCreateLabel("Passwort eingeben : ", 24, 16, 103, 17)
$Input1 = GUICtrlCreateInput("Testpasswort ", 136, 16, 121, 21, BitOR($ES_PASSWORD, $ES_AUTOHSCROLL))
$Button1 = GUICtrlCreateButton("Passwort verdeckt", 32, 80, 123, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetOnEvent(-1, "Verstecken")
$Button2 = GUICtrlCreateButton("Passwort anzeigen ", 224, 80, 107, 25, 0)
GUICtrlSetOnEvent(-1, "Anzeigen")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(100)
WEnd

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

Func Form1Close()
Exit
EndFunc ;==>Form1Close

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

Func Verstecken()
_SendMessage(GUICtrlGetHandle($Input1), $EM_SETPASSWORDCHAR, Asc("*"))
GUICtrlSetState($Input1, $GUI_FOCUS)
GUICtrlSetState($Button1, $GUI_DISABLE)
GUICtrlSetState($Button2, $GUI_ENABLE)
EndFunc ;==>Verstecken

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

Func Anzeigen()
_SendMessage(GUICtrlGetHandle($Input1), $EM_SETPASSWORDCHAR, "")
GUICtrlSetState($Input1, $GUI_FOCUS)
GUICtrlSetState($Button2, $GUI_DISABLE)
GUICtrlSetState($Button1, $GUI_ENABLE)
EndFunc ;==>Anzeigen

[/autoit]