Close

   

Declaration:

Procedure Close (Var F : Anyfiletype) ;

Description:

Close flushes the buffer of the file F and closes F. After a call to Close, data can no longer be read from or written to F.

To reopen a file closed with Close, it isn't necessary to assign the file again. A call to Reset or Rewrite is sufficient.

Errors:

None.

See also:

Assign, Reset, Rewrite

Example

Program Example9;

{ Program to demonstrate the Close function. }

Var F : text;

begin
 Assign (f,'Test.txt');
 ReWrite (F);
 Writeln (F,'Some text written to Test.txt');
 close (f); { Flushes contents of buffer to disk, 
              closes the file. Omitting this may
              cause data NOT to be written to disk.}
end.