Курсовая работа: Защита программы от нелегального копирования

end; {Add_BPB_Type}

{Элементдисковогокаталога:}

Dir_Type=record case Byte of

1:(

Name:array[1..8] of Char; {Имяфайлаиликаталога}

Ext:array[1..3] of Char; {Расширение}

FAttr:Byte; {Атрибутыфайла}

Reserv:array[1..10] of Byte; {Резервноеполе}

Time:Word; {Время создания}

Date:Word; {Дата создания}

FirstC:Word; {Номер первого кластера}

Size:LongInt {Размер файла в байтах});

2:(NameExt:array[1..11] of Char)

end; {Dir_Type}

{Описатель логического раздела}

PartType=record

Act:Boolean; {Флаг активности раздела}

BegHead:Byte; {Головка начала раздела}

BegSC:Word; {Сектор/цилиндр начала}

SysCode:Byte; {Системный код}

EndHead:Byte; {Головка конца раздела}

EndSC:Word; {Сектор/цилиндр конца}

RelSect:LongInt; {Относительный сектор начала}

FoolSiz:LongInt {Объем в секторах}

end; {PartType}

{Загрузочный сектор диска}

PBoot=^TBoot;

TBoot=record

case Byte of