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.