home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / sampler / 04 / diverse / textrec.def < prev    next >
Encoding:
Text File  |  1988-05-16  |  582 b   |  27 lines
  1. TYPE
  2.   CharBuf = array[0..127] of char;
  3.   TextRec = RECORD
  4.     Handle     : Word;
  5.     Mode       : Word;
  6.     BufSize    : Word;
  7.     Private    : Word;
  8.     BufPos     : Word;
  9.     BufEnd     : Word;
  10.     BufPtr     : ^CharBuf;
  11.     OpenFunc   : pointer;
  12.     InOutFunc  : pointer;
  13.     FlushFunc  : pointer;
  14.     CloseFunc  : pointer;
  15.     UserData   : Array[1..16] of byte;
  16.     Name       : Array[0..79] of char;
  17.     Buffer     : CharBuf;
  18.   END;
  19.  
  20. { File mode magic numbers }
  21. CONST
  22.   fmClosed = $D7B0;
  23.   fmInput  = $D7B1;
  24.   fmOutput = $D7B2;
  25.   fmInOut  = $D7B3;
  26.  
  27.