Darksider3

help

Aug 2nd, 2010
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.93 KB | None | 0 0
  1. #include <GUIConstants.au3>
  2.  
  3.  
  4. $Form1_1 = GUICreate("Dark´scripter", 497, 380, 207, 180)
  5. $inupt = GUICtrlCreateInput("", 8, 16, 145, 21)
  6. $Name = GUICtrlCreateLabel("Name", 160, 16, 32, 17)
  7. $Edit = GUICtrlCreateEdit("", 8, 64, 473, 201)
  8. $Checkbox1 = GUICtrlCreateCheckbox("Erstelle Kopie", 8, 280, 113, 25)
  9. $Erstellen = GUICtrlCreateButton("Erstellen", 8, 336, 121, 33)
  10. $Beenden = GUICtrlCreateButton("Beenden", 144, 336, 113, 33)
  11. GUISetState(@SW_SHOW)
  12.  
  13.  
  14. While 1
  15.     $nMsg = GUIGetMsg()
  16.     Switch $nMsg
  17.         Case $GUI_EVENT_CLOSE
  18.             Exit
  19.         Case $Beenden
  20.             Exit
  21.         Case $Erstellen
  22.             if $Edit = -1 Then
  23.     MsgBox( 64, "ERROR", "Kein Script Eingeschrieben")
  24. Else
  25.     MsgBox( 64, "erfolg!", "Erfolg!")
  26.         FileOpen (""& $Inupt, 108 )
  27.         FileWrite( ""& $Inupt, ""& $Edit )
  28.         FileClose("")
  29.     If $Checkbox1 = -1 Then
  30.        
  31.     Else
  32.         FileOpen (".../lol/"& $Inupt, 108 )
  33.         FileWrite( ""& $Inupt, ""& $Edit )
  34.         FileClose("")
  35.     EndIf
  36. EndIf
  37.     EndSwitch
  38. WEnd
Add Comment
Please, Sign In to add comment