Delphi 7 Сортировка по типу

[alicealice]

Здравствуйте, помогите, пожалуйста не очень разбираюсь
у меня есть данные, которые заношу в Stringgrid.
Например, есть несколько специалистов разных специальностей
Но на каждую специальность приходится где-то 2-3 специалиста.
По мере добавления информации о специалистах они разбросаны кто как
Нужно сделать сортировку по профессии.
Т.е бухгалтера к бухгалтерам, экономисты к экономистам. (колонка такая присутствует в таблице)
сказали как-то через массив с присвоением числа. я не особо понимаю как это реализовать.

[evg_m]

у меня есть данные, которые заношу в Stringgrid.
Например, есть несколько специалистов разных специальностей

это ПРИМЕРНО так?

иванов иван иванович бух 
семенов семен сем эконом
....   бух
....

procedure swaprow(sg: tstringgrid, k,m: integer);
var
  i: integer;
  t: string;
begin
  for i:=0 to sg.colcount-1 do begin
    t:=sg.cells[i,k];
    sg.cells[i,k]:=sg.cells[i,m];
    sg.cells[i,m]:=t;
  end;
end;

Т.е бухгалтера к бухгалтерам, экономисты к экономистам.

col_type_proff:=<номер этой колонки> //(колонка такая присутствует в таблице)

for i:=1 to stringgrid.rowcount-2 do
for j:=i to stringgrid.rowcount-1 do
  if stringgrid.cells[col_type_proff, i] > stringgrid.cells[col_type_prof, j] then swaprow(stringgrid,i,j);

при условии что профессии записаны АБОЛЮТНО одинаково.

бухгалтер 
БУХГАЛТЕР
старший бухгалтер

это будут ТРИ РАЗНЫЕ группы