[kirill.psl]

Всем доброго времени суток, в делфях работаю очень редко и вот в данный момент прям не как без них, в общем делаю курсач по БД и нужно написать программку и вот не как не могу заставить правильно работать DBComboBox, база у меня на MSSQL подключаю через ADOConnection, ADOQuery, DataSource ну и на табличку к примеру вешаю (DBGrid), но вот не как не могу правильно подключить (или в цикле проблема) DBComboBoх в общем подключаю так что у меня выводится только первый элемент из базы, как я понял нужно написать цикл (гугление сказало тоже самое)

Вот что у меня вышло :

Код:

procedure TForm1.DBComboBox1Change(Sender: TObject);
begin
ADOQueryCOMBOProduct.First;
DBComboBox1.Items.Clear;  // чистим
While not ADOQueryCOMBOProduct.EOF do
   begin
       DBComboBox1.Items.Add(ADOQueryCOMBOProduct.FieldByName('name_product').AsString);
   ADOQueryCOMBOProduct.Next; // го на следующего
end;
end;

Admin: Пользуемся тегами для оформления кода!

поправьте что не так плиз ребят, уж очень срочно надо! заранее спасибо