FILEPOS                  Get Current File Position                    pp 97

 Syntax:  FilePos (FilVar) ;

 Type:    File

 Form:    Function

 Purpose: Return integer value of current file position.

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


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


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

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