LongFileSize             Returns # of Items of Data File

 LongFileSize(var DFile : file of <type>) : Real;                        [TP]
 LongFileSize(var UFile : file) : Real;                                  [TP]

    Returns the number of records in the file accessed by the file
    variable DFile or UFile. This function can be used for MS-DOS files
    that are so large that there are more than (MAXINT + 1) records.

           DFile    A data file.

          <type>    Any type except a file type.

           UFile    An untyped file.

           Note:    See FileSize for a function that will return the
                    number of records for files that have (MAXINT + 1)
                    records or less. (MAXINT = 32767).

  -------------------------------- Example ---------------------------------

           X := LongFileSize(DFile);        { X = # of records }