пример для подключения Query1 в качестве источника данных для Комбо2:
Код:
procedure TForm1.DBLookupComboBox2Enter(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Text:='SELECT FieldForBox FROM MyTable WHERE KeyFieldForBox = '+DBLookupComboBox1.Value+'';
Query1.Open;
end;