Автор: kr3v3tkus 21.12.2007 0:13
Допустим есть база с записями
Цитата
Auto Model
4х4 pajero
4x4 I200
sedan lancer
итд, как можно подгрузить поле Model в DbLookupCombobox, если выбран определённый Auto?
у DbLookupCombobox нужно указать ListSource и KeyField?
Код
if combobox1.Text='mitsubishi' then
begin
if combobox2.Text='4x4' then
begin
form1.Query2.Active:=false;
form1.Query2.SQL.Text:='SELECT * FROM mitsubishi where Auto=4x4';
form1.Query2.Active:=true;
dblookupcombobox1.ListSource:=datasource2;
dblookupcombobox1.ListSource.DataSet.FieldByName('Model').AsString;
end;
end;