Типы
Типы
type
{Типизированные и нетипизированные файлы}
FileRec = record
Handle : Word;
Mode : Word;
RecSize : Word;
Private : array [1..6] of Byte;
UserData : array [1..16] of Byte;
Name : array [0..79] of Char;
end ;
{Текстовые файлы}
TextBuf = array [0..127] of Char;
TextRec = record
Handle |
Word; |
Mode |
Word; |
BufSize |
Word; |
Private |
Word; |
BufPos |
Word; |
BufEnd |
Word; |
BufPtr |
TextBuf ; |
OpenFunc |
Pointer; |
InOutFunc |
Pointer; |
FlushFunc |
Pointer; |
CloseFunc |
Pointer; |
UserData |
array [1..16] of Byte; |
Name |
array [0..79] of Char; |
Buffer |
TextBuf ; |
end; |
Registers = record
case Integer of
0: (AX, BX, CX, DX, BP, SI, DI, DS, ES, Flags: Word);
1: (AL, AH, BL, BH, CL, CH, DL, DH: Byte);
end;
DataTime = record
Year, Month, Day, Hour, Min, Sec: Integer;
end;
SearchRec = record
File: array [1..21] of Byte;
Attr: Byte;
Time: Longlnt;
Size: Longlnt;
Name: String [12] ;
end;
DirStr = String [67];{Диск и каталог}
NarneStr = String [8] ;{Имя файла}
ExtStr = String [4];{Расширение файла}
ComStr = String [127] ;{Командная строка}
PathStr = String [79];{Полный маршрут поиска файла}
Содержание Назад Вперед