CreateFile()

Syntax

Ergebnis = CreateFile(#Datei, Dateiname$)

Öffnet eine leere Datei.

Parameter

#Datei	Gibt die Nummer zum Identifizieren der neuen Datei an. #PB_Any kann verwendet werden, um diese Nummer automatisch zu generieren.
Dateiname$	Gibt den Dateinamen und den Pfad zur neuen Datei an. Wenn der Dateiname keinen vollständigen Dateipfad enthält, wird dieser relativ zum aktuellen Verzeichnis interpretiert.

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