запрос в аксес, добавление знаков вопроса

[Konstantin_ua]

ПРивет всем
После того как изымаю данные с БД в комбобокс, вместе с информацией добавляет знаки вопросов в некоторые поля. Вот код

try
    F_Main.qry1.SQL.Clear;
    F_Main.qry1.SQL.Add('SELECT Name_O FROM Oblasti');
    F_Main.qry1.Active:=True;
   except
    on e:Exception do
   end;
   for i:= 0 to F_Main.qry1.RecordCount - 1 do
    begin
      cbb1.Items.Add(F_Main.qry1.FieldByName('Name_O').AsString);
      F_Main.qry1.Next;
    end;

Вот скрины результата и БД
0.jpg
gthный.jpg

[Аватар]

   for i:= 0 to F_Main.qry1.RecordCount - 1 do

Цикл вообще-то дурацкий. Когда-нибудь будет куча проблем от такого. Правильно так

   while not F_Main.qry1.Eof do

А по поводу ? что-то темните. Возможно самостоятельно прорисовываете и засунули туда его

on e:Exception do

Ваще прелесть

[Konstantin_ua]

while not F_Main.qry1.Eof do

Спасибо буду его использовать, а по поводу знаков вопросов я так и не понял что там было(переписал все названия руками). Копировал с Википедии, может просто захватывал какой то символ, только бы его в аксесе должно как то отобразить.
это тоже исправил)

on e:Exception do
    ShowMessage('Âûçâàíà îøèáê&#224ñ ñîîáùåíèåì );