Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.03.2016, 09:45   #1
kucher69
Пользователь
 
Регистрация: 16.09.2015
Сообщений: 21
По умолчанию MS Access Добавление полей в ComboBox

Здравствуйте уважаемые форумчане!
есть таблица
12.png
Как из этой таблицы добавить все строки столбца VID в ComboBox.ITEMS

не знаю как посчитать количество полей в столбце, подозреваю что нужен цикл
Код:
ComboBox.ITEMS.add()
должно получиться вот так(сам добавлял вручную, а нужно при помощи процедуры которая добавляла бы с БД)


23.png
kucher69 вне форума Ответить с цитированием
Старый 13.03.2016, 11:49   #2
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,882
По умолчанию

Код:
TableDataset.First;
Combo.Items.Clear;
while not TableDataset.Eof do
begin
  Combo.Items.Add(TableDataset.FieldValues['VID']);
  TableDataset.Next;
end;
Примерно так, где тейблдатасет - датасет в котором у вас данные (Table, Query и т.п.)
Можно ещё попробовать прицепить TDBComboBox (свойства DataSet, KeyField, DataField), но я не пользую такого, использую только TDBLookupComboBox, вот он полезный для подстановки внешних данных (для внешнего ключа из другой таблицы в эту таблицу).
phomm вне форума Ответить с цитированием
Старый 17.03.2016, 15:39   #3
Festovec
Пользователь
 
Регистрация: 18.12.2008
Сообщений: 30
По умолчанию

Я делал так на MySQL
PHP код:
   ADOQuery2.Close;
   
ADOQuery2.SQL.Clear;
   
ADOQuery2.SQL.Add('SELECT * FROM TOPLIVO');
   
ADOQuery2.Open;
   while 
not ADOQuery2.Eof do
     
begin
       ComboBox1
.Items.Add(ADOQuery2.FieldByName('VID').AsString);
       
ADOQuery2.Next;
     
end
Festovec вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавление полей в бд из формы! Tasechka Microsoft Office Access 1 17.12.2012 13:14
Добавление полей в форму Minus_yu JavaScript, Ajax 3 26.04.2012 19:58
Добавить имена полей таблицы в Combobox Liones Общие вопросы Delphi 2 12.07.2010 12:02
Скрытие пустых полей в ComboBox CraZZZy-GameRRR Общие вопросы Delphi 6 17.04.2010 22:33
Добавление полей в Paradox _SERGEYX_ БД в Delphi 1 21.05.2009 18:27