|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Из combobox в edit'ы
Всем привет. Нужна помощь.
Суть вопроса такова: имеется DBLookupComboBox (Delphi 7) соединенный с базой в sql server 2008, необходимо при процедуре DBLookupComboBox1Click занести данные в несколько edit'ов и выбрать соответствующие поле ещё в одном DBLookupComboBox тоже соединенным с базой.( Данные из другой таблицы, но в таблице соединенной с 1 ComboBox имеется внешний ключ на эту таблицу.) Попробовал через параметры в select'e, но не могу понять как мне заполнить параметр, чтобы затем занести в параметр соответствующее значение из таблицы. Собственно говоря код: Код:
Form8.ADOQuery8.Active:=False; Form8.ADOQuery8.SQL.Clear; Form8.ADOQuery8.SQL.Add('select id_list from list where id_list=:idl1;'); Form8.ADOQuery8.Parameters.ParamByName('idl1').Value:= Form8.DBLookupComboBox1.KeyValue; Edit12.Text:=Form8.ADOQuery8.Parameters.ParamByName('idl1').Value;//edit костыль) Form8.ADOQuery8.SQL.Clear; Form8.ADOQuery8.SQL.Add('select data_list from list where id_list=:idl2 and data_list=:dat;'); Form8.ADOQuery8.Parameters.ParamByName('idl2').Value:=Edit12.Text; Form8.ADOQuery8.Parameters.ParamByName('dat').Value:=?;// не могу подобрать что-то, чтобы занести значение data_list соответствующее значению id_list(id уникальный), //хотя скорее всего менять нужно select Последний раз редактировалось Admin, 05.06.2019 в 19:17. |