ReadFile()

Syntax

Ergebnis = ReadFile(#Datei, DateiName$)

Öffnet eine existierende Datei 'DateiName$' ausschließlich für Lese-Operationen.

Wenn #PB_Any als '#Datei' Parameter verwendet wird, dann wird die neue Datei-Nummer als 'Ergebnis' zurückgegeben.

Ist 'Ergebnis' ungleich 0, wurde die Datei erfolgreich geöffnet, andernfalls konnte die Datei nicht geöffnet werden. Das Ergebnis muss immer getestet werden, da das Ausführen von Operationen auf nicht erstellte Dateien zu schlimmen Abstürzen führt.

Wenn die '#Datei' bereits benutzt wurde, wird die vorherige Datei automatisch geschlossen.

Beispiel:

  If ReadFile(0, "Text.txt")   ; wenn die Datei geöffnet werden konnte, setzen wir fort...
    While Eof(0) = 0           ; sich wiederholende Schleife bis das Ende der Datei ("end of file") erreicht ist
      Debug ReadString(0)      ; Zeile für Zeile im Debugger-Fenster anzeigen
    Wend
    CloseFile(0)               ; schließen der zuvor geöffneten Datei
  Else
    MessageRequester("Information","Konnte Datei nicht öffnen!")
  EndIf

Unterstützte OS

Alle