[ZeroCoolzz]

Помогите разобраться.
есть компонент Query с запросом: "SELECT DISTINCT Job FROM Table_5_JOB"
Затем нужно в компонент ComboBox (под именем "CB_JOB" ) из запроса все значения перенести. Для чего написал вот такой код:

Код:

  DM.QJob.Open;
  DM.QJob.First;
  CB_JOB.Items.Clear;
   if DM.QJob.RecNo<=DM.QJob.RecordCount then
   Begin
    CB_JOB.Items.Add(DM.QJobJob.Value);
    DM.QJob.Next;
   End;

Проблема в том что в итоге копируется ровно одна запись - первая, а их там 3. Возникает ощущение что комп на строку "DM.QJob.Next;" вообще не реагирует. Хотя если поместить на форму Грид и потключить его к запросу через ДатаСоурс и вручную тыкать по значениям то запрос переходит между ними.
Помогите пожалуйста.