Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <GUIConstants.au3>
- $Form1_1 = GUICreate("Dark´scripter", 497, 380, 207, 180)
- $inupt = GUICtrlCreateInput("", 8, 16, 145, 21)
- $Name = GUICtrlCreateLabel("Name", 160, 16, 32, 17)
- $Edit = GUICtrlCreateEdit("", 8, 64, 473, 201)
- $Checkbox1 = GUICtrlCreateCheckbox("Erstelle Kopie", 8, 280, 113, 25)
- $Erstellen = GUICtrlCreateButton("Erstellen", 8, 336, 121, 33)
- $Beenden = GUICtrlCreateButton("Beenden", 144, 336, 113, 33)
- GUISetState(@SW_SHOW)
- While 1
- $nMsg = GUIGetMsg()
- Switch $nMsg
- Case $GUI_EVENT_CLOSE
- Exit
- Case $Beenden
- Exit
- Case $Erstellen
- if $Edit = -1 Then
- MsgBox( 64, "ERROR", "Kein Script Eingeschrieben")
- Else
- MsgBox( 64, "erfolg!", "Erfolg!")
- FileOpen (""& $Inupt, 108 )
- FileWrite( ""& $Inupt, ""& $Edit )
- FileClose("")
- If $Checkbox1 = -1 Then
- Else
- FileOpen (".../lol/"& $Inupt, 108 )
- FileWrite( ""& $Inupt, ""& $Edit )
- FileClose("")
- EndIf
- EndIf
- EndSwitch
- WEnd
Add Comment
Please, Sign In to add comment