AlmarM Posted November 15, 2007 Posted November 15, 2007 #include <GUIConstants.au3> MsgBox(0, "Credits", "Credits to AlmarM") $First_Name = InputBox("First Name", "Whats your first name?") $Last_Name = InputBox("Last Name", "Whats your last name?") $Sex = InputBox("Sex", "Whats your sex? (Male / Female)") $Age = InputBox("Age", "Whats your age?") $Day_of_Birth = InputBox("Day of Birth", "Whats your Day of Birth? (DD-MM-YYYY)") $Country = InputBox("Country", "Where do you live?") $ZIP_Code = InputBox("ZIP Code", "Whats your ZIP Code?") $Email = InputBox("Email", "Whats your email?") $GUI = GUICreate("", 300, 300, -1, -1) $INFO = GUICtrlCreateEdit("Profile for: " & $First_Name & " " & $Last_Name & @CRLF & @CRLF & "First name: " & $First_Name & @CRLF & "Last name: " & $Last_Name & @CRLF & "Sex: " & $Sex & @CRLF & "Age: " & $Age & @CRLF & "Day of Birth: " & $Day_of_Birth & @CRLF & "Country: " & $Country & @CRLF & "ZIP Code: " & $ZIP_Code & @CRLF & "Email: " & $Email, 10, 10, 280, 280) GUISetState(@SW_SHOW) $FileSave = FileSaveDialog("Save Profile", "", "Text files (*.txt)", 2, "Profile.txt") $Read_INFO = GUICtrlRead($INFO) FileWrite($FileSave, $Read_INFO) GUIDelete($GUI) _Exit() While 1 $nMsg = GUIGetMsg() Select Case $nMsg = $GUI_EVENT_CLOSE Exit EndSelect WEnd Func _Exit() Sleep(100) Exit EndFunc I know its easy but I was bored ^^ And in some times it could be very handy And mayby u guys could use the idea Minesweeper A minesweeper game created in autoit, source available. _Mouse_UDF An UDF for registering functions to mouse events, made in pure autoit. 2D Hitbox Editor A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now