Záznam souboru

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání

Definice záznamů souborů interně používaných Turbo Pascalem jsou také deklarovány v jednotce WinDos a Dos.

TFileRec je použit pro typové i netypové soubory.

TTextRec je vnitřní formát proměnné typu text.

type
{ Typové i netypové soubory }
  TFileRec = record
    Handle: Word;
    Mode: Word;
    RecSize: Word;
    Private: array[1..26] of Byte;
    UserData: array[1..16] of Byte;
    Name: array[0..79] of Char;
  end;

{ Textový soubor }
  PTextBuf = ^TTextBuf;
  TTextBuf = array[0..127] of Char;
  TTextRec = record
    Handle: Word;
    Mode: Word;
    BufSize: Word;
    Private: Word;
    BufPos: Word;
    BufEnd: Word;
    BufPtr: PTextBuf;
    OpenFunc: Pointer;
    InOutFunc: Pointer;
    FlushFunc: Pointer;
    CloseFunc: Pointer;
    UserData: array[1..16] of Byte;
    Name: array[0..79] of Char;
    Buffer: TTextBuf;
  end;