Hallo,
über das Script
[autoit]#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <File.au3>
Opt('GuiOnEventMode',1) ;Schaltet den 'GuiOnEventMode' an
Opt('OnExitFunc', 'Ende') ;Ruf die Funktion 'Ende' auf, wenn das Programm geschlossen wird
#Region Variablen
Global Const $File_Pfad = 'TestDatei.txt' ;Definiert den Pfad der .txt Datei
#EndRegion
#Region .txt Datei Erstellen und Öffnen
If FileExists($File_Pfad) Then FileDelete($File_Pfad) ;Wenn die Datei vorhanden ist wird sie gelöscht!!!
_FileCreate($File_Pfad) ;Erstellt die Datei
$File_Handle = FileOpen($File_Pfad, 2) ;Öffnet die Datei
#EndRegion
#Region GUI Erstellen
$Form1 = GUICreate('Form1', 181, 221, 192, 124) ;Erstellt ein Fenster
GUISetOnEvent($GUI_EVENT_CLOSE, 'Ende') ;Wenn auf das 'X' geklickt wird, wird die Funktion 'Ende' aufgerufen
$Edit1 = GUICtrlCreateEdit('', 0, 0, 180, 180) ;Erstellt ein Eingabefeld
$Button1 = GUICtrlCreateButton('Speichern', 0, 180, 180, 40, $WS_GROUP) ;Erstellt den 'Sperichern' Button
GUICtrlSetOnEvent(-1, 'Speichern') ;Wenn auf den Button 'Speichern' geklickt wird, wird die Funktion 'Speichern' aufgerufen
GUISetState(@SW_SHOW) ;Zeigt das GUI
#EndRegion
#Region Endlosschleife ;Sorgt dafür, dass das Programm sich nicht schließt
While 1
Sleep(100)
WEnd
#EndRegion
#Region Funktionen
Func Speichern()
FileWrite($File_Handle, GUICtrlRead($Edit1)) ;Überschreibt die Datei mit dem Wert aus dem Eingabefeld
EndFunc
Func Ende()
FileClose($File_Handle) ;Schließt die Datei. Erst dann sieht man den Inahlt!!!
Exit ;Schließ das Programm
EndFunc
#EndRegion
möchte ich eine GUI haben, die mir eine beliebigen Text in eine Datei speichert.
Über den Button Speichern soll nun erst der Text des Editfeld in die Textdatei geschrieben werden und anschließend dass Programm beendet werden.
Natürlich darf die GUI auch viel viel kleiner werden. Ich möcht endlich nur eine Zeilemit 25 Zeichen eingeben und diese dann in eine Textdatei speichern. Geht das kürzer? Ein Button für eben speichern und schließen wäre super.
