Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBComboBox - как внести значения из базы? [D7, MySQL, Paradox]


Ossetic ©   (2006-03-16 19:51:00) 

Суть такова: есть таблица с столбцом "Округ". Надо сделать так, чтобы элементы столбца округ, отразились в списке элементов DBComboBox, и при выборе значения из этого списка происходила фильтрация по выбранному значению. Как это сделать? Как не пытаюсь - не получаеться.

З.Ы. Объясните попроще плз. (8


Ossetic   (2006-03-16 22:00:00) [1]

Все сделал... Спасибо.


Ossetic   (2006-03-16 21:19:00) [2]


> specdataset.filter := '...', Filtered := true
> или на сервере sql.text:='select... where ...'+нужное значение


Если сделать так, то это повлияет на все отображение БД, т.е. если у меня есть ДБСтрингГрид, тогда он тоже отобразит только результат выборки, остальные столбцы потеряются. (У меня таблица допустим Фамилия, Имя, Отество, Округ. Если сделаю как ты говоришь, получу в таблице только округ и все). Или мне два Query и DataSource ставить надо?
Также, если дать привязку на поле, то в результате запроса появляется только 1 текущий элемент. На свойство Items это не влияет. Они как были так и будут пустыми. Может ошибаюсь, но должна быть конструкция типа:
ComboBox1.Items:=<обращение_к_значениям_поля[TString]>.
И еще, через Query и Datasource можно выти на содержание как на заголовки, так и значения полей. Но они в формате TFields, или что-то в этом роде. Преобразовать в Стринги никак нельзя?


Desdechado   (2006-03-16 20:51:00) [3]

> Как не пытаюсь - не получаеться.
и как не пытаешься?

чтобы список появился в комбо, достаточно его натравить на датасет и нужное поле в нем
фильтрацию делать на клиенте specdataset.filter := '...', Filtered := true
или на сервере sql.text:='select... where ...'+нужное значение


Наверх

Титульная страница Поиск, карта сайта Написать письмо