|
Вопрос # 4 174/ вопрос решён / |
|
Доброго времени суток, уважаемые эксперты!
Преамбула. Таблица Ctrana родительская к таблице Subj. В Subj нужно добавить строку, одно из полей строки которое нужно сформировать по символьному списку из Ctrana и вернуть код элемента списка Ctrana.
На форму бросил DBGrid, DBCtrlGrid, DBNavigator настроил на Subj.
На DBCtrlGrid поместил DBEdit и DBComboBox. Если редактировать строку вводить символьные данные и коды то нет проблем.
Проблема в том, что необходимо в список DBComboBox поместить столбец Ctrana.
Настраиваю DBComboBox на таблицу Ctrana- затык.
HELP ME!
 |
Вопрос задал: Александр_К (статус: Посетитель)
Вопрос отправлен: 17 мая 2010, 08:14
Состояние вопроса: решён, ответов: 2.
|
Ответ #1. Отвечает эксперт: Егор
Здравствуйте, Александр_К!
Надо использовать не DBComboBox, а DBLookupComboBox. Т.к. структура таблиц описана неполно, то предположу, что в таблице Subj есть поле subj_id_ctrana, а в таблице Ctrana есть поля ctrana_id_ctrana и ctrana_name
Тогда настройка будет следующей:
1. нам нужны два DataSource - один будет подключен к таблице с субъектами, второй - к таблице со странами
2. свойство DataSource - указываем DataSource, который подключен к таблице subj
3. свойство DataField - указываем поле из таблицы Subj, в котором хранятся номера стран - subj_id_crtana
4. свойство ListSource - указываем DataSource, который подключен к таблице Ctrana
5. свойство KeyField - указываем поле из таблицы Ctrana, в котором хранятся индексы стран - ctrana_id_ctrana
6. свойство ListField - вот здесь уже указываем то поле, где хранятся названия стран - ctrana_name
уф, компилируем и идём пить пиво :)
 |
Ответ отправил: Егор (статус: 10-ый класс)
Время отправки: 18 мая 2010, 23:56
Оценка за ответ: 5
|
Ответ #2. Отвечает эксперт: Vic
Здравствуйте, Александр_К!
Проще будет использовать обычный Combobox
с вкладки Standard.
Например так:
Используем ADOQuery1 c запросом из таблицы Ctrana ('Select ID,Ctrana FROM Ctrana'),
ADOCommand1 с текстом 'Insert INTO Subj (ID_PARENT) VALUES (:par)
1. Заполним список
//
ComboBox1.Clear;
while not ADOQuery1.Eof do
begin
ComboBox1.Items.Add(ADOQuery1.Fields[1].asString);
ADOQuery1.Next;
end;
2. При выборе из списка нужного элемента позиционируем курсор на нужную строку набора данных ADOQuery1
ADOQuery1.First;
ADOQuery1.MoveBy(ComboBox1.ItemIndex);
3. вносим запись в дочернюю таблицу c помощью ADOCommand1
ADOCommand1.Parameters[0].Value:=ADOQuery1.Fields[0].asInteger;
ADOCommand1.Execute;
 |
Ответ отправил: Vic (статус: 1-ый класс)
Время отправки: 19 мая 2010, 18:02
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 2; последнее сообщение — 24 мая 2010, 18:24; участников в обсуждении: 2.
|
|
Александр_К (статус: Посетитель), 24 мая 2010, 08:47 [#1]:
Спасибо Егор и Vic за помощь!
|
|
|
Егор (статус: 10-ый класс), 24 мая 2010, 18:24 [#2]:
обращайся ещё 
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
31 января 2011, 19:36: Статус вопроса изменён на решённый (изменил модератор Ерёмин А.А.): Автоматическая обработка (2 и более ответов с оценкой 5)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
