Closes a file previously opened with a file operations command. |
filehandle = variable defined with the WriteFile or OpenFile command |
Command Description:
Use this command to close a file previously opened. You should always close a file as soon as you have finished reading or writing to it. |
Example:
; Reading and writing custom types to files using ReadFile, WriteFile and CloseFile ; Initialise some variables for the example Type HighScore Field Name$ Field Score% Field Level% End Type Best.HighScore = New HighScore Best\Name = "Mark" Best\Score = 11657 Best\Level = 34 ; Open a file to write to fileout = WriteFile("mydata.dat") ; Write the information to the file WriteString( fileout, Best\Name ) WriteInt( fileout, Best\Score ) WriteByte( fileout, Best\Level ) ; Close the file CloseFile( fileout ) ; Open the file to Read filein = ReadFile("mydata.dat") ; Lets read the Greatest score from the file Greatest.HighScore = New HighScore Greatest\Name$ = ReadString$( filein ) Greatest\Score = ReadInt( filein ) Greatest\Level = ReadByte( filein ) ; Close the file once reading is finished CloseFile( fileout ) Print "High score record read from - mydata.dat " Write "Name = " Print Greatest\Name Write "Score = " Print Greatest\Score Write "Level = " Print Greatest\Level WaitKey() |