Click above to get retro games delivered to your door ever month!

  Name:     findsize() - get file's size from last findfirst/next()
  Usage:    <integer> = findsize()
  Params:   none
  Returns:  integer equal to the size of the last file found by
            findfirst() or findnext()

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

                 nfiles = filecount("*.dbf")
                 if nfiles > 0
                      declare dbfarray[nfiles]
                      declare dbfsizes[nfiles]
                      temp = findfirst("*.dbf")
                      size = findsize()
                      for n = 1 to nfiles
                           dbfarray[n] = temp
                           dbfsizes[n] = size
                           temp = findnext()
                           size = findsize()
                      next
                 endif

  Note:     Findsize() should only be used in conjunction with
            findfirst() and findnext(). In order to work correctly,
            you must call findsize() immediately after your call
            to findfirst() or findnext(). findsize() will get the
            the date of the file that findfirst() or findnext()
            just returned. findsize() always assumes that you
            have done a findfirst() or findnext() call first.