Hilfe
CloseFile
Aufruf
Parameter
Rückgabewert
Beschreibung
Beispiel
Siehe auch
CloseFile stream%
Parameter
stream | mit OPENFILE, READFILE oder WRITEFILE ermittelte Identität |
Rückgabewert
-
Beschreibung
Diese Anweisung schließt den Zugriff auf eine Datei, welche mit OPENFILE, READFILE oder WRITEFILE geöffnet wurde.
Das Schließen einer Datei sollte auf jeden Fall nach dem Schreiben bzw. Lesen erfolgen - sonst können Datenträgerfehler nach einem Absturz entstehen - verlorene Dateifragmente genannt.
Beispiel
Schreibt und liest eine Highscore:
fileout = WriteFile("mydata.dat")
WriteString(fileout, "Klaus Dieter Pohl")
WriteInt(fileout, "10000")
WriteByte(fileout, "12")
WriteString(fileout, "Super Ingo")
WriteInt(fileout, "12345")
WriteByte(fileout, "10")
Name$ = "Mario von Peach"
punkte% = "81502"
Level% = 15
WriteString(fileout, Name$)
WriteInt(fileout, punkte%)
WriteByte(fileout, Level%)
CloseFile(fileout)
filein = ReadFile("mydata.dat")
Repeat
Name$ = ReadString$(filein)
Punkte% = ReadInt(filein)
Level% = ReadByte(filein)
Print level + " - " + Punkte + " - " + Name
Until Eof(filein)
CloseFile(filein)
WriteString(fileout, "Klaus Dieter Pohl")
WriteInt(fileout, "10000")
WriteByte(fileout, "12")
WriteString(fileout, "Super Ingo")
WriteInt(fileout, "12345")
WriteByte(fileout, "10")
Name$ = "Mario von Peach"
punkte% = "81502"
Level% = 15
WriteString(fileout, Name$)
WriteInt(fileout, punkte%)
WriteByte(fileout, Level%)
CloseFile(fileout)
filein = ReadFile("mydata.dat")
Repeat
Name$ = ReadString$(filein)
Punkte% = ReadInt(filein)
Level% = ReadByte(filein)
Print level + " - " + Punkte + " - " + Name
Until Eof(filein)
CloseFile(filein)
Siehe auch

