Передача ключевого значения в DBGrid

[shaurma.ru]

Всем привет. При разработки приложения для базы столкнулся с такой проблемой - у меня есть два DBLookupComboBox в которых я выбираю месяц и год. Есть таблица в Access: Месяц(КодМесяца(ключ), НазваниеМесяца, Год). Необходимо передать в ADODataSet КодМесяца.DBgrid поключен к ADODataSet. Как быть?

[alexiz]

Сообщение от shaurma.ru

Всем привет. При разработки приложения для базы столкнулся с такой проблемой - у меня есть два DBLookupComboBox в которых я выбираю месяц и год. Есть таблица в Access: Месяц(КодМесяца(ключ), НазваниеМесяца, Год). Необходимо передать в ADODataSet КодМесяца.DBgrid поключен к ADODataSet. Как быть?

Ничего не понятно.

"DBgrid поключен к ADODataSet" - в смысле ADOQuery?

В DBGrid отображаются данные из DataSet, а при чем тут DBLookupComboBox?

Может Вам просто нужно в Гриде показать LookUp-поле, для которого в таблице БД будет числовой номер месяца,а в Гриде его наименование?

[shaurma.ru]

есть два DBLookupComboBox,подключены к таблице "месяц" в которых я выбираю НазваниеМесяца и Год соответственно, keyvalue из этих боксов должно по идее передаваться в SQL запрос, из которого нужно получить КодМесяца (внешний ключ к другой таблице).Надеюсь так понятно? Схему прилагаю[IMG]
Таблица DBGrid строится из запроса в ADODataSet[IMG][/IMG]

[alexiz]

Надеюсь так понятно?

С трудом.
1. DBLookupComboBox обычно используется для ввода значения в базу данных (ч-з Dataset), которое соответствует какому нибудь наименованию. (Для этого к нему подключается таблица словарь, ListSource).
Например ComboBox соединен с основной таблицей.Месяц, где месяц - число 1..12. Визуально в нем отображаются имена месяцев (Январь, Февраль..), которые находятся в дополнительной таблице всего из 12 записей - НомерМесяца, ИмяМесяца.
Зачем у Вас в таблице вместе с именами месяцев еще и год пока непонятно.
2.Похоже, что Вам нужно получить данные по отработанному времени за определенный месяц и год. Тогда DBLookupComboBox вообще не нужен.
Для выбора входных параметров SQL-запроса достаточно двух просто ComboBox-ов. Один-год, второй-месяц. Из них можно извлечь числовые значения, вставить их как параметры в запрос, а результат запроса вывести в DBGrid.

Я так вижу.. ;-)

[shaurma.ru]

Названий месяцев двенадцать, а "годов" может быть сколько угодно)) поэтому и кодовмесяца мб сколько угодно))

Сообщение от alexiz

вставить их как параметры в запрос

А как добыть эти самые параметры для запроса?? если грид заполняется адодатасетом и запрос у меня на вставку записей .Insert; , например
Vedom.DBGrid1.DataSource.DataSet.Fi elds[0].AsInteger:=strtoint(DBLookupComboB ox1.KeyValue);

[alexiz]

Сообщение от shaurma.ru

Названий месяцев двенадцать, а "годов" может быть сколько угодно)) поэтому и кодов месяца мб сколько угодно))

Ну, вот, туман уже рассеивается.
Код месяца у Вас это что-то типа номера рабочего периода-месяца, в которых накапливаются данные. Значит в таблице ГодыМесяцы могут быть значения КодМесяца от, допустим, 1007 (2010 июль) до 1111 (2011 ноябрь).
DBLookupCombo здесь не нужны, достаточно поставить рядом два просто ComboBox-a, первый - Годы, второй - Месяцы. Для заполнения первого нужно выбрать только годы, имеющиеся в табл. ГодМес-в, а для второго опять же наши традиционные 12 месяцев.

После этого по кнопке или по событию OnChange переоткрывать ADOQuery:

ADOQuery.SQL.Text:='select * from MyTable where NMONTH=:NMONTH';      
ADOQuery.Parameters.ParamByName('NMONTH').Value:=GetMonthCode;
ADOQuery.Open;

Сообщение от shaurma.ru

А как добыть эти самые параметры для запроса??

И самое интересное - функция GetMonthCode.

Если КодМесяца Вы сделаете в показанном выше виде, то

function GetMonthCode: integer;
begin
  Result:=StrToint(Copy(YearComboBox.Text,3,2))*100+
             MonthComboBox.ItemIndex+1; //возможные значения от 0 до 11
end;