Показать сообщение отдельно
  #1  
Старый 13.10.2013, 01:45
Аватар для Homo-Fantasmus
Homo-Fantasmus Homo-Fantasmus вне форума
Прохожий
 
Регистрация: 23.08.2011
Адрес: МО
Сообщения: 46
Версия Delphi: Delphi, Lazarus
Репутация: 10
По умолчанию Динамический запрос

Всем привет!

Нужна помощь в создании динамического запроса.

Имеется БД (Access) c двумя таблицами.
Имеется Form1 c ADOConnection, DataSource, ADOQuery2, DBLookupComboBox1и DBLookupComboBox2
Требуется чтобы по выбору какого-то значения из DBLookupComboBox1 формировался динамический запрос для последующего вывода данных в DBLookupComboBox2.
Как я это пытался сделать:
Код:
procedure TForm1.DBLookupComboBox1Click(Sender: TObject);
begin

ADOQuery2.Close;
ADOQuery2.SQL.Clear;

sql:= 'SELECT * FROM power WHERE [Модель] = Form.DBLookupComboBox1.Text';

ADOQuery2.SQL.Add(sql);
ADOQuery2.Open;
DBLookupComboBox2.KeyValue := DBLookupComboBox2.ListSource.DataSet.FieldByName(DBLookupComboBox2.KeyField).Value; 
DBLookupComboBox2.Refresh;
end;


end.

При запуске компилятора и выборе в DBLookupComboBox1 любого значения появляется ошибка: "... Параметр DBLookupComboBox1 не имеет значения по умолчанию..."

Где я накосячил ?