Guest User

Untitled

a guest
Oct 15th, 2018
108
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.74 KB | None | 0 0
  1. #RequireAdmin
  2. #include <EditConstants.au3>
  3. #include <GUIConstantsEx.au3>
  4. #include <WindowsConstants.au3>
  5. Global $button1
  6. Global $name
  7. Global $name2
  8. Global $Input1
  9.  
  10.  
  11. while 1
  12. $Form1=GUICreate("TestGUI", 199, 110, 5, 5, "", "")
  13. $Input1=GUICtrlCreateInput("",6,6,70,60,"")
  14.     $button1 = GUICtrlCreateButton("ENTER", 80, 30, 60, 40, "", "")
  15.  
  16. GUISetState(@SW_SHOW)
  17.  
  18.     While 1
  19.         $nMsg = GUIGetMsg()
  20.         Switch $nMsg
  21.             Case -3
  22.                 Exitloop 2
  23.     Case $button1
  24.         $name = Iniread(@DesktopDir&"\TestGUI.ini", "User", @UserName, "default")
  25. Do
  26. Until GUICtrlRead($Input1) = $name
  27.                 MsgBox(64, "Eingabe", "Passwort wurde richtig eingegeben!")
  28.                     Exit
  29.                     ExitLoop
  30.                 GUIDelete($Form1)
  31.     endswitch
  32. WEnd
  33. WEnd
Add Comment
Please, Sign In to add comment