home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TOOL-INC.ZIP / GETFILE2.DCL < prev    next >
Encoding:
Text File  |  1989-06-02  |  213 b   |  10 lines
  1. const
  2.    maxnumfiles =  200;
  3.    null =         #0;
  4. type
  5.    filestring =   string [64];
  6.    filearray =    array [1.. maxnumfiles] of filestring;
  7. var
  8.    filetable:     filearray;
  9.    filecount:     integer;
  10.