Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Как получить результат TQuery


Автор: Гость_Алексей 7.4.2004, 19:06
Люди, помогите! Delphi 6. Есть Paradox'овская таблица, скажем, | код продукта | название продукта |. Есть Table1, DataSource1 и DBGrid1. Выполняется Query1 с текстом SELECT NazvanieProducta FROM product.db WHERE KodProducta = 0100. И теперь нужно результаты этой выборки вывести в ComboBox. Как?

Автор: Vit 7.4.2004, 20:31
Код

While not query1.eof do
 begin
 Combobox1.items.add(query1.fields[0].asstring);
 query1.next;
 end;

Автор: Гость_Алексей 8.4.2004, 07:36
Благодарю. withstupid.gif

Автор: Susel 8.4.2004, 08:47
А ещё проще использовать DBLookupComboBox, если код продукта уникален... ListSource указываешь DataSource для своей таблицы (ну если сильно хочется - для запроса smile.gif ), ListField - поле с названием продукта, а Key - код продукта... И всё, при активизации таблицы - DBLookupComboBox будет заполнен всеми продуктами из таблицы, а при выборе какого либо продукта указатель в таблице автоматически перемещается на нужную запись... Если выбранный код продукта нужно ещё занести в какую то другую таблицу, то уазываешь DataSource этой таблицы и DataField - поле в которое будет заноситься код продукта...

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)