CreateFile()
Syntax
Ergebnis = CreateFile(#Datei, Dateiname$ [, Flags])Beschreibung
Öffnet eine leere Datei.
Parameter
#Datei Die Nummer zum Identifizieren der neuen Datei. #PB_Any kann verwendet werden, um diese Nummer automatisch zu generieren. Dateiname$ Der Dateiname und der Pfad zur neuen Datei. Wenn der Dateiname keinen vollständigen Dateipfad enthält, wird dieser relativ zum aktuellen Verzeichnis interpretiert. Flags (optional) Kann eine Kombination (mit Hilfe des '| Operanden) der folgenden Werte sein: #PB_File_SharedRead : die geöffnete Datei kann von einem anderen Prozess gelesen werden (nur auf Windows). #PB_File_SharedWrite: die geöffnete Datei kann von einem anderen Prozess geschrieben werden (nur auf Windows). #PB_File_NoBuffering: das PureBasic-interne Datei-Puffersystem wird für diese Datei deaktiviert. FileBuffersSize() kann bei dieser Datei nicht verwendet werden.kombiniert mit einem der folgenden Werte (die folgenden Flags beeinflussen das Verhalten von WriteString()(), WriteStringN(), ReadString(), ReadCharacter() und WriteCharacter()):#PB_Ascii : alle Lese/Schreib-String-Operationen werden ASCII verwenden, wenn nicht anders angegeben (Standard für ASCII-Executable). #PB_UTF8 : alle Lese/Schreib-String-Operationen werden UTF-8 verwenden, wenn nicht anders angegeben (Standard für Unicode-Executable). #PB_Unicode: alle Lese/Schreib-String-Operationen werden Unicode verwenden, wenn nicht anders angegeben.
Rückgabewert
Gibt einen Wert ungleich Null zurück, wenn die Datei erfolgreich erstellt wurde, und Null bei einem Fehler. Wenn #PB_Any als #Datei Parameter verwendet wurde, dann wird bei Erfolg die neu generierte Nummer zurückgegeben.
Anmerkungen
Wenn die Datei bereits existiert, wird sie durch eine neue leere Datei überschrieben. Die Funktion FileSize() kann verwendet werden, um festzustellen, ob eine Datei existiert, damit der Anwender vor dem Überschreiben gefragt werden kann.
Um eine existierende Datei für das Lesen/Schreiben zu öffnen, verwenden Sie die OpenFile() Funktion. Um eine Datei nur für das Lesen zu öffnen, verwenden Sie ReadFile().
Beispiel
If CreateFile(0, "Text.txt") ; wir erstellen eine neue Textdatei... For a=1 To 10 WriteStringN(0, "Line "+Str(a)) ; wir schreiben 10 Zeilen (jede mit einem Zeilenumbruch) Next For a=1 To 10 WriteString(0, "String"+Str(a)) ; und jetzt ergänzen wir 10 weitere Strings auf der gleichen Zeilen (da kein Zeilenumbruch hinzugefügt wird) Next CloseFile(0) ; schließen der zuvor geöffneten Datei und damit endgültiges Abspeichern der Daten Else MessageRequester("Information","Konnte Datei nicht erstellen!") EndIf
Siehe auch
OpenFile(), ReadFile(), CloseFile()
Unterstützte OS
Alle