Dateien, oeffnen, schliessen, Lesen / Schreiben von Textdateien / Binaerdateien

^

9.3 Anlegen, Öffnen und Schließen von Dateien

Um mit einer Datei arbeiten zu können, müssen Sie sie zuerst "öffnen" (was beim Anlegen automatisch geschieht) und nach Gebrauch wieder "schließen". Dabei legen Sie fest, ob Sie Daten in die Datei schreiben (write), aus ihr lesen (read) oder beides (read/write) wollen (Parameter 'accessFlags$'). Read/Write ist der Standard.

Da GEOS ein MultiThread-System ist, kann es passieren, dass andere Programme gleichzeitig auf diese Datei zugreifen wollen. Deswegen müssen Sie festlegen ob und wie andere Programme gleichzeitig auf Ihre Datei zugreifen dürfen (read, write, read/write bzw. gar nicht). Der Standard ist, keinerlei Zugriff zu erlauben (Parameter 'alienFlags$'). Sie sollten davon nur abweichen, wenn es unbedingt erforderlich ist, da das System in diesem Fall viele Daten zwischenspeichern muss, was den Systemspeicher sehr belasten kann.

FileCreate

Legt eine Datei auf dem Datenträger an und öffnet sie. Existiert die Datei schon, kann sie auch verwendet (Daten bleiben erhalten) oder verworfen werden.

Syntax: <fh> = FileCreate fileName$ [ , accessFlags$ [ , alienFlags$ ] ]

<fh>: Variable vom Typ FILE.
fh enthält dann eine Referenz auf die Datei und wird für alle anderen Dateioperationen benötigt.

fileName$: Name der Datei.

accessFlags$: Zugriffsflags (optional): Zeichenkette,
bestehend aus einer Kombination der Buchstaben "otn g rw x", die den Zugriff auf die Datei festlegen. Der Standard (accessFlags$ nicht angegeben) ist "n rw": Neue Datei zum Lesen und Schreiben anlegen.

alienFlags$: Fremdzugriffsflags (optional): Zeichenkette,
bestehend aus einer Kombination der Buchstaben "rw", die den Zugriff auf die Datei festlegen. Der Standard (alienFlags$ nicht angegeben) ist "": Keine Fremdzugriffe erlaubt.

Der Dateizeiger ist nach dem Anlegen einer Datei immer auf die Position 0 gesetzt, auch wenn sie schon Daten enthält. Wollen Sie Daten anhängen, müssen Sie ihn zunächst mit der Anweisung FileSetPos ans Dateiende setzen.

Die Systemvariable fileError wird gesetzt oder gelöscht. Beispiele und eine ausführliche Beschreibung der Flagzeichen finden Sie weiter unten.

Mögliche Fehlerbedingungen für FileCreate sind unter anderem:

Die Datei existiert, aber es wurde 'n' (nur neu anlegen) angegeben.
Die Datei existiert als DOS-Datei, aber es wurde 'g' (GEOS Daten-Datei anlegen) angegeben.
Die Datei existiert und es wurde 'o' (open) bzw. 't' (truncate, abschneiden) angegeben, aber sie ist von einem anderen Programm geöffnet, und dieses verweigert den Zugriff.

FileOpen

Öffnet eine Datei. Die Datei muss schon auf dem Datenträger vorhanden sein.

Syntax: <fh> = FileOpen fileName$ [ , accessFlags$ [ , alienFlags$ ] ]

<fh>: Variable vom Typ FILE.
fh enthält dann eine Referenz auf die Datei und wird für alle anderen Dateioperationen benötigt.

fileName$: Name der Datei.

accessFlags$: Zugriffsflags, optional): Zeichenkette,
bestehend aus einer Kombination der Buchstaben "rwx", die den Zugriff auf die Datei festlegen. Der Standard (accessFlags$ nicht angegeben) ist "rw": Datei zum Lesen und Schreiben öffnen.

alienFlags$: Fremdzugriffsflags, optional): Zeichenkette,
bestehend aus einer Kombination der Buchstaben "rw", die den Zugriff auf die Datei festlegen. Der Standard (alienFlags$ nicht angegeben) ist "": Leerstring, keine Fremdzugriffe erlaubt.

Der Dateizeiger ist nach dem Öffnen einer Datei immer auf die Position 0 gesetzt. Wollen Sie Daten anhängen, müssen Sie ihn zunächst mit der Anweisung FileSetPos ans Dateiende setzen.

Die Systemvariable fileError wird gesetzt oder gelöscht. Beispiele und eine ausführliche Beschreibung der Flagzeichen finden Sie weiter unten.

Mögliche Fehlerbedingungen für FileOpen sind unter anderem:

Die Datei existiert nicht.
Die Datei existiert, aber sie ist von einem anderen Programm geöffnet, und dieses verweigert den Zugriff.

Flagzeichen für FileCreate und FileOpen

Die Befehle FileCreate und FileOpen erwarten ein oder zwei Zeichenketten, in denen durch einzelnen Buchstaben symbolisiert ist, was Sie wollen. Das Setzen einzelner Bits oder, wie hier, Zeichen, wird üblicherweise als das Setzen von "Flags" (Flaggen) bezeichnet.

accessFlags$ (Zugriffs-Flaggen-Zeichen) ist eine Zeichenkette,

die bestimmt, wie die Datei angelegt oder geöffnet werden soll und ob auf die Datei lesend und/oder schreibend zugegriffen werden soll.

Mögliche accessFlags für FileOpen: r, w, x (x nur für Profis)
Mögliche accessFlags für FileCreate: g, n, t, o, r, w, x (x nur für Profis)

alienFlags$ (Fremd-Zugriffs-Flaggen-Zeichen) ist eine Zeichenkette,

welche die Zugriffsrechte für andere Programme bestimmt, während die Datei offen ist. Wird alienFlags$ nicht angegeben, so wird "" (leer, keine Zugriffsrechte) angenommen. Sie sollten davon nur abweichen, wenn es unbedingt erforderlich ist, da das System in diesem Fall viele Daten zwischenspeichern muss, was den Systemspeicher sehr belasten kann.

Mögliche alienFlags$ für FileOpen und FileCreate: r, w

Zugriffsflags (accessFlags$) für FileCreate und FileOpen

r "read": Aus der Datei kann gelesen werden.

w "write": In die Datei kann geschrieben werden.

Wird weder 'r' noch 'w' angegeben, wird 'rw' angenommen. Dies ist auch der Standard, wenn accessFlags$ nicht angegeben wird.

Zugriffsflags (accessFlags$) nur für FileCreate

g "GEOS": Es wird eine GEOS-Daten-Datei angelegt. Der Dateiname muss den GEOS-Namenskonventionen (max. 32 Zeichen) entsprechen. Wird 'g' nicht angegeben, wird eine DOS-Datei angelegt. Der Name muss dann der Konvention 8.3 entsprechen.

n "neu": Nur Neuanlegen erlaubt. Es ist ein Fehler, wenn die Datei schon existiert, die Systemvariable fileError wird entsprechend gesetzt.

o"open": Existiert die Datei schon, wird sie normal geöffnet. Die vorhandenen Daten bleiben erhalten.

t "truncate" (= abschneiden): Existiert die Datei schon, wird sie abgeschnitten. Die vorhandenen Daten gehen verloren.

Wird weder 'n', 'o' noch 't' angegeben, wird 'n' angenommen. Dies ist auch der Standard, wenn accessFlags$ nicht angegeben wird.

Beispiele:

FileOpen "info.txt", "r"     'Nur Lesezugriff zugelassen
                             'Kein Fremdzugriff, da keine alienFlags$ angegeben.
FileCreate "info.txt", "orw" 'Öffnen einer vorhandenen Datei oder Anlegen
                             'einer Neuen mit Schreib- und Lesezugriff.
                             'Eventuell vorhandenen Daten bleiben erhalten.
                             'Kein Fremdzugriff, da keine alienFlags$ angegeben.
FileCreate "info.txt", "gtw" 'Öffnen einer vorhandenen GEOS-Daten-Datei
                             'oder Anlegen einer Neuen zum Schreibzugriff,
                             'ohne Lesezugriff. Eventuell vorhandene Daten
                             'werden gelöscht.
                             'Kein Fremdzugriff, da keine alienFlags$ angegeben.

Fremdzugriffsflags (alienFlags$) für FileCreate und FileOpen: r "read": Andere Programme können aus der Datei lesen; w "write": Andere Programme können in die Datei schreiben.
Wird weder 'r' noch 'w' angegeben, wird "" (keine Zugriffsrechte) angenommen. Dies ist auch der Standard, wenn alienFlags$ nicht angegeben wird.

Tipps:

Für die Flags sind Groß- und Kleinbuchstaben erlaubt.
Die Reihenfolge der Flagzeichen ist egal.
Stringausdrücke sind erlaubt.
Überflüssige bzw. ungültige Zeichen werden ignoriert. Sie können den Flags-String so optisch strukturieren. Zu lange Zeichenketten (mehr als 32 Zeichen) können aber zu einem Laufzeitfehler führen.
Verwenden Sie statt der Buchstaben keine Worte wie z.B. "write" statt "w". Sie würden im Beispiel die Datei zum Schreib und Lesezugriff öffnen, da write die Buchstaben w und r enthält.

Sonstige accessFlags, nur für Profis:

x "eXtended": Erweiterter Zugriff, z.B. auf den Header einer GEOS-Datei.

Achtung! Ungültige Änderungen im Header können die Arbeit mit der Datei unmöglich machen! GEOS kann die Datei in bestimmten Fällen auch nicht mehr löschen. Sie sollten hier ganz genau wissen, was Sie tun. Der Programmierer von R-BASIC übernimmt keinerlei Haftung!

Beispiele für FileOpen und FileCreate:

Die folgenden Beispiele setzen voraus, dass eine FILE-Variable folgendermaßen definiert ist:

DIM fh AS FILE

Anlegen einer DOS-Datei zum Lesen und schreiben. Existiert die Datei schon, soll die Variable fileError gesetzt werden. Fremdprogramme sollen während dessen keinen Zugriff haben:

fh = FileCreate "Info.TXT"

Diese Anweisung ist identisch mit: FileCreate "Info.TXT", "rw", ""

Anlegen einer GEOS-Daten-Datei zum Lesen und schreiben. Es muss das Flag "g" angegeben werden, damit eine GEOS-Datei erzeugt wird. Existiert die Datei schon, soll die Variable fileError gesetzt werden. Fremdprogramme sollen während dessen Lesezugriff haben. Der Parameter "accessFlags$" muss angegeben werden um "alienFlags$" angeben zu können:

fh = FileCreate  "Meine Daten" , "g", "r"

Anlegen einer GEOS-Daten-Datei nur zum Schreiben. Existiert die Datei schon, wird sie geöffnet und der Inhalt verworfen. Fremdprogramme sollen während dessen keinen Zugriff haben:

fh = FileCreate "Mein Daten-Logbuch", "gtw"

Anlegen einer DOS-Datei zum Lesen und Schreiben. Existiert die Datei schon, wird sie geöffnet, der Inhalt bleibt erhalten. Fremdprogramme sollen während dessen keinen Zugriff haben:

fh = FileCreate "Data.dat", "o"

Öffnen einer Datei zum Lesen und schreiben. Fremdprogramme sollen während dessen keinen Zugriff haben:

fh = FileOpen "Info.TXT"

Diese Anweisung ist identisch mit: FileOpen "Info.TXT", "rw", ""

Öffnen einer GEOS-Daten-Datei zum Lesen und schreiben. Beachten Sie, dass das Flag 'g' nicht angeben wird, R-BASIC erkennt selbstständig, dass es sich um eine GEOS-Datei handelt. Fremdprogramme sollen während dessen Lesezugriff haben. Der Parameter "accessFlags$" muss angegeben werden um "alienFlags$" angeben zu können:

fh = FileOpen "Meine Daten", "rw", "r"

Öffnen einer Datei nur zum Lesen. Fremdprogramme sollen während dessen keinen Zugriff haben:

fh = FileOpen "Daten.TXT", "r"

Tipp: Wenn Sie nicht sicher sein können, ob die Datei schon existiert, verwenden Sie FileCreate mit den accessFlags o (open) oder t (truncate). Um eventuell vorhandene Daten nicht zu verlieren, verwenden Sie das Flag o:

fh = FileCreate "Data.dat", "o"

FileClose

Schließt eine offene Datei. Alle evt. noch im Hauptspeicher befindlichen Daten werden auf den Datenträger geschrieben. Nach dem Schließen haben andere Programme wieder den vollen Zugriff auf die Datei, die von FileOpen bzw. FileCreate gesetzten Restriktionen sind aufgehoben.

Syntax: FileClose <fh>
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiel:

DIM fh AS FILE
fh = FileOpen "info.txt"
...
FileClose fh

NullFile

Liefert eine "leere" Dateivariable zurück, dient also zum Löschen einer Dateivariablen.

Syntax: <dateiVariable> = NullFile(). Die Klammern sind erforderlich.
<dateiVariable>: Variable vom Typ FILE.

Nachdem die Datei geschlossen wurde (FileClose), sollten Sie der Dateivariablen mit Hilfe der Funktion NullFile() die Information "keine Datei" zuweisen.

DIM  fh AS FILE
...
FileClose fh
fh = NullFile()

Sie können dann prüfen, ob eine Datei noch offen ist:

IF fh <> NullFile() THEN ...

Verwenden Sie im Falle eines Programmierfehlers eine schon geschlossene Datei nochmals, z.B. in der Reihenfolge

FileClose fh
x = FileRead (fh)

gibt es einen BASIC Laufzeitfehler und das Programm wird beendet.

^

9.4 Lesen und Schreiben von Binärdateien

FileRead, FileWrite und FileInsert sind Universalroutinen. Sie arbeiten mit allen Dateien und allen Typen von Variablen zusammen, einschließlich Strings und Strukturen. Dateien, die nicht aus einer Abfolge von Textzeilen bestehen werde allgemein als binäre Dateien oder Binärdateien bezeichnet. Für die Arbeit mit Textdateien (lesen und schreiben von Textzeilen) gibt es zusätzlich darauf spezialisierte Routinen, siehe Kapitel 9.5.

FileRead

Liest eine bestimmte Anzahl von Bytes aus einer Datei. Der Dateizeiger wird hinter die gelesenen Daten gesetzt. Die Daten werden entsprechend dem Typ des Ausdrucks, in dem FileRead vorkommt, interpretiert.

Syntax: <var> = FileRead ( <fh> , size [, signed] )

<var>: Variable von beliebigem Typ. Die gelesenen Daten werden in diese Variable kopiert.

<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

size: Anzahl der zu lesenden Bytes.
Bei numerischen Daten bestimmt size den Datentyp (1 = Byte, 2 = Word oder Integer, 4 = DWord, LONGINT oder WWFixed, 10 = Real).
Zulässige (Grenz~) Werte für size: 1 <= size <= 16384 ( 16 kByte)

signed:(optional): TRUE oder FALSE (default: FALSE).
Nur für numerische Daten der Größe 2 Byte oder 4 Byte:

signed = TRUE: Daten sind Integer oder Longint (je nach size)
signed = FALSE: Daten sind Word oder DWord (je nach size)
Ist <var> vom Typ WWFixed, wird signed ignoriert.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiele:

y = FileRead (fh, 2)        ' Lesen eines Word-Wertes (2 Byte)

y = FileRead (fh, 2, TRUE)  ' Lesen eines Integerwertes (2 Byte)

text$ = FileRead (fh, 100)  ' 100 Byte lesen und als Text ansehen.
 ! Ein String endet, wenn eine binäre Null (ASCII-Code Null)
 ! gelesen wird.
 ! LEN(stringVariable) kann daher kleiner als  'size' sein.
 ! Trotzdem werden  'size' Bytes gelesen.

DIM  time AS DateAndTime
time = FileRead (fh, SizeOf(time))  ' Lesen einer Struktur

FileWrite

Schreibt eine bestimmte Anzahl von Bytes in eine Datei, indem vorhandene Daten überschrieben werden. Bei Bedarf werden die Daten angehängt, d.h. die Datei wird verlängert. Der Dateizeiger wird hinter die geschriebenen Daten gesetzt.

Syntax: FileWrite(<fh>, <expression>, size [, signed])
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

<expression>: Ausdruck von beliebigem Typ.
Das Ergebnis des Ausdrucks (z.B. eine Zahl, eine Struktur oder ein Text) wird in die Datei kopiert.

size: Anzahl der zu schreibenden Bytes.
Bei numerischen Daten bestimmt size den Datentyp (Byte, Word, DWord, Integer, LONGINT, Real), in den die Zahl vor dem Schreiben konvertiert wird.
Zulässige (Grenz~) Werte für size: 1 <= size <= 16384 ( 16 kByte)

signed: (optional): TRUE oder FALSE (default: FALSE).

Nur für numerische Daten der Größe 2 Byte oder 4 Byte:
signed = TRUE: Daten sind Integer oder Longint (je nach size)
signed = FALSE: Daten sind Word oder DWord (je nach size)
Ist <var> vom Typ WWFixed, wird signed ignoriert.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiele:

FileWrite (fh, n, 2)          ' Schreiben eines Word-Wertes

FileWrite (fh, 110, 2, TRUE)  ' Schreiben eines Integer-Wertes

FileWrite (fh, text$ , 100)   ' 100 Byte als Text schreiben.
 ! Ist text$ länger, wird der String abgeschnitten.
 ! Es wird keine Textendekennung (Null) geschrieben.
 ! Ist text$ kürzer, wird mit Nullen aufgefüllt.

DIM time AS DateAndTime
FileWrite (fh, time, SizeOf( time))  ' Schreiben einer Struktur

FileInsert

Fügt eine bestimmte Anzahl von Bytes in eine Datei ein, ohne das vorhandene Daten überschrieben werden. Die Datei wird dadurch automatisch verlängert. Der Dateizeiger wird hinter die geschriebenen Daten gesetzt.

Syntax: FileInsert <fh>, <expression>, size [, signed])
<fh> , <expression> , size [, signed]) siehe FileWrite.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiele: siehe FileWrite.

Spezielle Hinweise zum Speichern von File-, Handle- und Objekt-Variablen in Dateien

FileRead, FileWrite und FileInsert können mit File-, Handle und Objektvariablen bzw. Ausdrücken umgehen. Verwenden Sie als Datengröße die Werte

SizeOf(File) (=6), SizeOf(Handle) (=6), SizeOf(Object) (=8).

Es ist jedoch im Normalfall nicht sinnvoll, diese Werte in einer Datei zu speichern, da die enthaltenen Werte nur zeitlich begrenzt gültig sind.

File-Variablen sind nur solange gültig, wie die Datei geöffnet ist. Wird die Datei nach dem Schließen erneut geöffnet, ist der Inhalt der Dateivariablen NICHT mit dem vom ersten Mal identisch.
Handle-Variablen sind nur solange gültig, wie das von Ihnen bezeichnete Objekt bzw. die dahinter stehende Datenstruktur vorhanden ist. Beispielsweise gilt das von FileFindFirst$ gelieferte Handle nur so lange, bis FileFindDone gerufen wird. Ein erneutes FileFindFirst$ liefert eine anderes Handle, auch wenn es im gleichen Verzeichnis sucht.
Die Ausnahme sind Handles, die von der VMFiles-Library geliefert werden und sich auf Datenstrukturen in einer VM-Datei beziehen. Diese müssen üblicherweise in der VM-Datei selber gespeichert werden und sind so lange gültig, wie die Datenstrukturen selbst in der VM-Datei sind.
Objektvariablen sind so lange gültig, wie das Objekt, auf das die Variable verweist, existiert.

Spezielle Hinweise zum Speichern von numerischen Werten in Dateien

R-BASIC kennt 3 vorzeichenlose (BYTE, WORD und DWord) und 4 vorzeichenbehaftete (INTEGER, LONGINT, WWFixed und REAL) numerische Datentypen.

Um Zahlen mit diesen Datentypen sowohl in Dateien schreiben als auch aus Ihnen lesen zu können, gelten folgende Konventionen:

Lesen von numerischen Werten:

Der Parameter size von FileRead bestimmt, wie viele Bytes gelesen und wie sie interpretiert werden (d.h. welchem Datentyp sie entsprechen). Zulässig sind die Werte:
1: Lesen eines Byte
2: Lesen eines Word oder Integer
4: Lesen eines DWord, LongInt oder WWFixed
10: Lesen eines Real-Wertes
Andere Werte können zu unerwarteten Ergebnissen führen. Die ersten beiden gelesenen Bytes werden als Word (bzw. Integer) interpretiert, die restlichen Bytes werden verworfen.
Der Parameter signed bestimmt für die 2 und 4-Byte Datentypen, ob die Bytes als vorzeichenlose Zahl (word bzw. DWord, signed=FALSE, default-Wert) oder als vorzeichenbehaftete Zahl interpretiert werden (integer bzw. longint, signed=TRUE, signed muss angegeben werden).
Für WWFixed-Variablen wird signed ignoriert.
Verwenden Sie am besten den gleichen Wert für signed, den Sie auch beim Schreiben verwendet haben.
Nachdem die Daten gelesen und interpretiert wurden, werden sie von FileRead in eine Realzahl konvertiert, so dass FileRead innerhalb von beliebigen Ausdrücken wie jede andere Funktion verwendet werden kann.

Beispiele:

DIM x, z AS Real
DIM n AS Word

n = FileRead(fh, 2)         ' Lesen eines Word
x = FileRead(fh, 2, TRUE)   ' Lesen eines Integerwertes,
                            ' aber speichern als Real
x = FileRead(fh, 4, TRUE)   ' Lesen eines LONGINT
x = FileRead(fh, 4)         ' Lesen eines DWord
z = 2.7 * FileRead(fh, 2) + FileRead(fh, 10)

Schreiben von numerischen Werten:

Die Parameterkonventionen sind denen von FileRead analog.

Der Parameter size von FileWrite bzw. FileInsert wie viele Bytes geschrieben werden und in welchen Datentyp die Zahl vorher konvertiert werden soll. Zulässig sind die Werte:
1: Schreiben eines Byte
2: Schreiben eines Word oder Integer
4: Schreiben eines DWord oder LongInt
10: Schreiben eines Realwertes
Bei ungültigen Werten wird zunächst ein Word (bzw. Integer) geschrieben und der Rest mit Nullen aufgefüllt.
Der Parameter signed bestimmt für die 2 und 4-Byte Datentypen, ob die Bytes als vorzeichenlose Zahl (word bzw. dword, signed=FALSE, default-Wert) oder als vorzeichenbehaftete Zahl geschrieben werden (integer bzw. longint, signed=TRUE, signed muss angegeben werden).
Dazu wird der von <expression> gelieferte (REAL~) Wert zunächst in den entsprechenden Datentyp konvertiert und dann in die Datei geschrieben.
Der Unterschied zwischen vorzeichenlosen und vorzeichenbehafteten Werten ist, dass entsprechend den R-BASIC Konventionen bei vorzeichenbehafteten Werten (signed = TRUE ) bei einer Zahlenbereichsüberschreitung (z.B. 100 000 für Integer) eine Begrenzung auf den größten bzw. kleinsten Wert erfolgt, während bei vorzeichenlosen Werten eine Modulo-Operation erfolgt, d.h. man fängt bei zu großen oder zu kleinen Werten einfach wieder von vorne an.

Beispiele:

DIM x AS Real
DIM n AS Word

FileWrite(fh, n, 2)        ' Schreiben eines Word
FileWrite(fh, x, 2, TRUE)  ' x runden und Schreiben als Integerwert
FileWrite(fh, x, 4, TRUE)  ' Schreiben eines LONGINT, x vorher runden
FileWrite(fh, n, 4)        ' Schreiben eines DWord, n vorher
                           ' in DWord konvertieren

Tipp: Wenn Sie mehr als eine einzige numerische Variable speichern wollen ist es sinnvoll, diese in eine Struktur zu packen. Damit ersparen Sie sich auch die manuelle Typunterscheidung, da R-BASIC dies bei Strukturen automatisch macht.

^

9.5 Lesen und Schreiben von Textdateien

R-BASIC verfügt über Spezialbefehle zum Lesen und Schreiben von Zeilen aus Textdateien. Diese Befehle arbeiten nur mit Stringvariablen zusammen und werden in diesem Abschnitt erklärt. Universelle Lese- und Schreibefehle finden Sie im Abschnitt 9.4.

FileReadLine$, FileWriteLine, FileInsertLine und FileReplaceLine sind auf Textzeilen, die durch ein Zeilenendezeichen abgeschlossen sind, spezialisiert. Das trifft für normale Textdateien zu. Zeilenendezeichen sind die ASCII-Codes 13 (Wagenrücklauf, Carriage return, CR) bzw. 10 (Zeilenvorschub, LineFeed, LF) oder eine Kombination davon, üblicherweise die Folge 13, 10 (CRLF).

Hinweis: Ein Texteditor und auch ein Text Objekt fügt häufig zur Gewährleistung der Lesbarkeit von Texten automatische (nur am Bildschirm vorhandene) Zeilenumbrüche ein. Die R-BASIC "Textzeilen" erscheinen daher als "Absätze" in einem Texteditor oder in einem Textobjekt.

FileReadLine$

Liest eine Textzeile aus einer Datei. Es werden maximal so viele Zeichen gelesen, wie die zu belegende Variable aufnehmen kann. Ist die Zeile länger (d.h. es wurde keine Zeilenendekennung gelesen), so wird fileError auf -11 (LINE_TO_LONG) gesetzt. Ihr Programm kann dann entsprechend reagieren. Die fehlenden Zeichen werden nicht übergangen, das nächste FileReadLine$ liest sie ein.

Syntax: <z$> = FileReadLine$(<fh> [, mode])
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.
mode: (optional): Behandlung der Zeilen-Ende-Zeichen. Siehe Tabelle.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Mode-Konstanten für FileReadLine$ (RLM = ReadLine Mode)

Tabelle

Hinweise:

Am Dateiende wird eine fehlende Zeilenendekennung akzeptiert und fileError auf Null (Kein Fehler) gesetzt.
Lesen über das Dateiende hinaus setzt fileError auf 128 (SHORT_READ_WRITE), siehe Beispiel 2

Beispiele:

z$ = FileReadLine$ (fh)                  ' eine Zeile lesen

WHILE fileError = 0
  z$ = FileReadLine$(fh)                 ' eine Zeile lesen
  IF fileError <> 0 THEN Print z$        ' und ausgeben
WEND

z$ = FileReadLine$(fh, RLM_DONT_CHANGE)  ' eine Zeile inkl. CR/LF lesen

FileWriteLine

Schreibt eine Textzeile, indem vorhandene Daten überschrieben werden. Bei Bedarf wird die Textzeile angehängt, d.h. die Datei wird verlängert.

Syntax: FileWriteLine <fh>, zeile$ [, mode])
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.
zeile$: zu schreibender Text
mode: (optional): Behandlung der Zeilen-Ende-Zeichen. Siehe Tabelle.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Mode-Konstanten für FileWriteLine, FileInsertLine, FileReplaceLine

Tabelle

Beispiele:

FileWriteLine fh, "Hallo Welt"                     'CRLF automatisch anhängen

FileWriteLine fh, "Hallo Welt\r",WLM_SET_TO_CRLF  ''\r' (CR) durch CRLF ersetzen

FileWriteLine fh, "\r\r\r",WLM_SET_TO_CRLF        '3 Leerzeilen

FileWriteLine fh, \
                   "Text geschrieben von R-BASIC", WLM_SET_TO_CRLF
FileWriteLine fh, "Letzte Zeile",WLM_DONT_CHANGE  ' kein CRLF anhängen

FileInsertLine

Schiebt eine Textzeile in die Datei ein. Die Datei wird dadurch verlängert.

Syntax: FileInsertLine <fh>, zeile$ [, mode])
<fh>, zeile$ [, mode]): siehe FileWriteLine

Die Systemvariable fileError wird gesetzt oder gelöscht.

FileReplaceLine

Ersetzt eine Textzeile in einer Datei durch eine andere. Die ersetzte Zeile darf maximal 1024 Zeichen lang sein (R-BASIC Begrenzung für Strings).

Syntax: FileReplaceLine <fh>, zeile$ [, mode])
<fh>, zeile$ [, mode] ): siehe FileWriteLine

Die Systemvariable fileError wird gesetzt oder gelöscht.

^

9.6 Sonstige Funktionen

Positionieren des Dateizeigers

Während die Datei geöffnet ist, gibt es einen "Dateizeiger", der die Position bestimmt, an der Daten gelesen oder geschrieben werden. Der Zugriff auf den Dateizeiger einer Datei erfolgt über eine Variablen vom Typ FILE, die von FileOpen bzw. FileCreate geliefert wird.

FileGetPos

Liest die aktuelle Position des Dateizeigers aus. Der zurückgegebene Wert liegt im Bereich von 0 (Dateianfang) bis 4294967295, da Dateien maximal 4 GByte groß werden können.

Syntax: <numVar> = FileGetPos (<fh>)
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiel:

 ' Herausfinden, ob man schon am Dateiende ist
IF FileSize(fh) = FileGetPos(fh) THEN Print "Dateiende erreicht"

FileSetPos

Setzt den Dateizeiger an eine bestimmte Position. Die folgenden File~ Operationen lesen bzw. schreiben ab dieser neuen Position.

Syntax: FileSetPos <fh>, position[ , fromEnd]

<fh>: Dateivariable, bestimmt die betroffene Datei.

position: neue Dateiposition

fromEnd: bestimmt den Positionierungsmodus

nicht angegeben oder Null: Ab Dateianfang
ungleich Null: Ab Dateiende

Achtung! "position" muss hier negativ sein, damit Sie eine Position vor dem Dateiende anwählen. Ist "position" positiv, ist das Ergebnis unbestimmt. Manchmal wird die Datei verlängert, manchmal nicht.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiele:

Setzen des Dateizeigers an den Dateianfang:

FileSetPos fh, 0

Setzen des Dateizeigers ans Dateiende, so dass FileWrite Daten an die Datei anhängen kann:

FileSetPos fh, 0, TRUE

Setzen des Dateizeigers 100 Byte vor das Dateiende. Der Parameter "position" ist hierzu negativ:

FileSetPos fh, -100, TRUE

Verschieben des Dateizeiger um 10 Byte nach hinten:

FileSetPos fh, FileGetPos(fh) + 10

Setzen des Dateizeigers hinter das 2. Byte (ab Dateianfang). Das erste Byte hat die Position 0, das zweite die Position 1:

FileSetPos fh, 2

Tipps & Tricks:

Benutzen Sie FileSize, um die aktuelle Größe der Datei zu ermitteln.
Setzen Sie den Dateizeiger hinter das Dateiende (auf einen Wert, der größer ist, als der von FileSize gelieferte), so ist das Ergebnis unbestimmt.
Anmerkung: In einigen Fällen wird die Datei verlängert (und die neu angehängten Bytes mit Nullen initialisiert), in anderen Fällen wurde die Dateilänge nicht geändert.

Weitere Dateioperationen

FileResize

Einfügen oder Löschen von Bytes an der aktuellen Position einer Datei. Die dahinter folgenden Daten werden automatisch verschoben. Eingefügte Bytes werden mit Null initialisiert. Der Dateizeiger wird hinter die eingefügten Bytes gesetzt. FileResize eignet sich auch, um Null-Bytes an eine Datei anzufügen.

Syntax: FileResize <fh>, bytesToDelete, bytesToInsert
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.
bytesToDelete: Anzahl zu löschender Bytes. Maximal 2 GByte.
bytesToInsert: Anzahl einzufügender Bytes. Maximal 2 GByte.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiele:

FileResize fh, 200, 0    ' 200 Bytes löschen. Der Dateizeiger bleibt
                         ' an der aktuellen Position.
                         
FileResize fh, 0, 200    ' 200 Bytes einfügen, der Dateizeiger steht
                         ' hinter den eingefügten Bytes.
                         
FileResize fh, 100, 200  ' 100 Byte löschen und durch 200 Null-Bytes ersetzen.
                         ' Die Datei wird um 100 Byte verlängert, der Dateizeiger
                         ' wird hinter die 200 Null-Bytes gesetzt.
                         
FileResize fh, 100, 40   ' 100 Byte löschen und durch 40 Null-Bytes ersetzen.
                         ' Die Datei wird um 60 Byte kürzer, der Dateizeiger wird
                         ' hinter die 40 Null-Bytes gesetzt.
                         
FilePos fh, 0, TRUE      ' Dateizeiger ans Dateiende
FileResize fh, 0, 800    ' 800 Null-Bytes anhängen

FileTruncate

FileTruncate schneidet die Datei an der Position des aktuellen Dateizeigers ab.

Syntax: FileTruncate <fh>
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

Die Systemvariable fileError wird gesetzt oder gelöscht.

Beispiel:

 ! Einkürzen einer Datei auf die Länge Null, d.h. alle Daten löschen.
FileSetPos fh, 0
FileTruncate fh

FileCommit

Bewirkt, dass alle in Daten der Datei unverzüglich auf die Platte geschrieben werden. Das GEOS-System hält aus Performance-Gründen viele Daten oft bis zum Schließen der Datei im Speicher, d.h. die Daten kommen manchmal erst beim FileClose wirklich auf der Platte an. FileCommit ist sinnvoll, wenn mehrere Programme gleichzeitig auf die gleiche Datei zugreifen und man kann damit einem Datenverlust im Falle eines Systemabsturzes vorbeugen.

Syntax: FileCommit <fh>
<fh>: Variable (oder Funktion) vom Typ FILE. Bezeichnet die Datei.

Die Systemvariable fileError wird gesetzt oder gelöscht.

^

Erweitere Konvertierfunktionen für macOS & Linux - Neue Funktionen in R-BASIC 1.02

Weiter...