FileSize

Definition

function FileSize(FileNum: Integer): LongInt;

Availability

SCAR Divi 3.00 > Current

Description

Returns the file size of the file open in a stream associated with the index FileNum in the file stream resource manager.

Example

var
  f: Integer;

begin
  f := Rewritefile(LogsPath + 'Test.txt', False);
  WriteFileString(f, 'Hello World!');
  CloseFile(f);

  f := OpenFile(LogsPath + 'Test.txt', False);
  WriteLn(FileSize(f));
  CloseFile(f);

  DeleteFile(LogsPath + 'Test.txt');
end.

See Also

• GetFileSize
• EndOfFile
• OpenFile
• RewriteFile
• CloseFile