Сортировка за алфавитом

[$T@LKER]

Народ помогити - мне нужно зделать сортировку в таблице за фамилиями которые должны стоять по алфавит! Мне нужно что взять первый символ из фамилии, это впринцыпе я здела - но есть проблема фимилии у меня типа string , а мне нужно тот первый исимвол присвоить переменной типа char но естественно неполучаеться это зделать. Так собственно вот вопрос - можна ли переобразовать символ типа стринг в символ типа чар?!

[Serge_Bliznykov]

var s : string;
   ch : char;
...
  s := 'Сидоров';
  {неявное преобразование:}
  ch := s[1];
  {прямое указание приведения типов}
  ch := char(s[1]);

только Вы что-то делаете не так:
строчки можно напрямую сравнивать:

  if s1<s2 then ....

[$T@LKER]

О спасиба, я и забыл что к элиментам строки можна обращаться как к элиментам масива)))Сравнение строк напрямую?! Ну незнаю чё то мне кажеться что оно сравнивает её целиком а мне нужно что бы сравнивало первую букву ну сотвественно потом меняло местами строки за алфавитом. Но всёравно спасиба))