базы данных

[phasha]

как сделать нормальную кодировку по поиску в базах?

begin
  tbl1.First;
while not Tbl1.EOF do begin
 if Tbl1.Fields[1].AsString = 'ˆ¢** ˆ¢**®¢'{Иван Иванов} then begin
 ShowMessage(Tbl1.FieldByName('NPHONE').AsString);
   Break;
 end;
 Tbl1.Next;
 end;
end;

т.е. что бы вывести телефон иванова я ищу не самого иванова а вот ЭТО "'ˆ¢** ˆ¢**®¢'"возмозжно есть способ сделать так чтоб процедура искала по кирилице ну или хотя бы по латинице, подскажите пожалуйста?

[phasha]

Новая папка.rarвот исходник

[phasha]

все,кодировку в самой базе поменял