next up previous contents index
Next: Variables. Up: TypesVariables and Constants Previous: Constants

Types

type 
   tmeminfo = record 
      available_memory : longint;
      available_pages : longint;
      available_lockable_pages : longint;
      linear_space : longint;
      unlocked_pages : longint;
      available_physical_pages : longint;
      total_physical_pages : longint;
      free_linear_space : longint;
      max_pages_in_paging_file : longint;
      reserved : array[0..2] of longint;
   end;
  Returns information about the memory allocation etc.

NOTE: The value of a field is zero if the value is unknown, it's only guaranteed, that available_memory contains a valid value.

type
trealregs = record
  case integer of
   1: { 32-bit } (EDI, ESI, EBP, Res, EBX, EDX, ECX, EAX: longint;
                  Flags, ES, DS, FS, GS, IP, CS, SP, SS: word);
   2: { 16-bit } (DI, DI2, SI, SI2, BP, BP2, R1, R2: word;
                  BX, BX2, DX, DX2, CX, CX2, AX, AX2: word);
   3: { 8-bit }  (stuff: array[1..4] of longint;
                  BL, BH, BL2, BH2, DL, DH, DL2, DH2,
                  CL, CH, CL2, CH2, AL, AH, AL2, AH2: byte);
   4: { Compat } (RealEDI, RealESI, RealEBP, RealRES,
                  RealEBX, RealEDX, RealECX, RealEAX: longint;
                  RealFlags,
                  RealES, RealDS, RealFS, RealGS,
                  RealIP, RealCS, RealSP, RealSS: word);
end;

registers = trealregs;
  This data structure is used to pass register values to an real mode interrupt handler.
type
   tseginfo = record 
      offset : pointer;
      segment : word;
   end;
  This record is used to store a 48-bit pointer.

Michael Van Canneyt
Tue Mar 31 16:46:10 CEST 1998