Сортировка простым выбором в Delphi

[Vlad111]

Здравствуйте, помогите написать метод класса для сортировки сведений по заработной плате, используя метод сортировки простым выбором. Имеется класс для обработки сведений о сотрудниках (Tperson=class) , структура данных типа запись
Sotrud=record
Famil:str;
Dolgn:str;
Zarpl:real;
данные хранятся в диамическом массиве Tdata=array of sotrud; надо написать процедуру
procedure Tperson.Sort_stat(var pp:Tdata);
var x:sotrud;
------ : integer;

заранее спасибо.
P.S.Сортировка нужна по значению заработной платы.