Курсовая работа: Хэш поиск

1. Листинг и описание всех классов библиотеки на DP.

6.1. Описание всех классов.

unitClassHeshProg;

interface

type

TItem=class{класс-элементсписка}

private

key: string;

next: TItem;

public

Constructor Create(aNext:TItem;aKey:string);//создание 1 элемента

function Getnext:TItem;//дать адрес на след. элемент

procedure SetNext(aNext:TItem);//изм. адрес

Function GetKey:string;//датьключ

end;

{***********************************}

TList=class {класссписка}

private

Head:TItem;//заголовоксписка

public

constructor Create(aKey:string);//созданиесписка

function AddFirst(aKey:string):boolean;//добавлениепередзаголовком

function AddLast(aKey:string):boolean;//добавлениепослезаголовка

function GetHead:TItem;// датьзаголовка

end;

{***********************************}

TMas=class {класс-контейнер массива списков}

private

mas:array [1..10]of TList;

public