Цифровой поиск методом "ПАТРИЦИЯ". Опции

[-=К99=-]

Задача такая: Написать программу "Телефонная книга" с возможностью поиска по Ф.И.О абонента и по номеру телефона, поиск производить методом "ПАТРИЦИЯ", в задаче я использую файл с записями следующего вида:

Код

phonebook=record
                 name:string;{имя}
                 surname:string;{фамилия}
                 ot:string;{отчество}
                 namber_phon:word;{номер телефона}
                 st:string;{страна}
                 ob:string;{область}
                 city:string;{город}
                 stret:string;{улица}
                 haus_namber:byte;{дом}
                 flat_namber:byte;{квартира}
     end;

Проблема только в поиске методом "ПАТРИЦИЯ", если нетрудно помогите с решением.