FILESIZE                    Determine File Size                       pp 98

 Syntax:  FileSize (FilVar) ;

 Type:    File

 Form:    Function

 Purpose: Return integer value of file size.

 Notes:   Use LongFileSize, LongFileSize, and LongSeek with MS-DOS.
          FileSize does not apply to text files.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          IntVar  :  Integer           ; { Define integer variable    }

       BEGIN
          IntVar  := FileSize (FilVar) ; { Get current position value }
       END.