Доброго времени суток.
Подскажите люди добрые.
Имеется:
1)Таблица БД Acces c полями <Тип>, <Модель>, <Чувствительность>, <Мощность>.
2)Форма с объектами БД ADOConnection1, DataSource1, ADOQuery1, DBLookupComboBox1 и несколько Edit (Edit1...Edit6).
В результате некоторого действия (не суть какого) из таблицы БД в DBLookupComboBox1 добавляется поле (столбец) <Модели>.
Я хочу чтобы при выборе из DBLookupComboBox1 конкретной записи (модели), в Edit5 добавлялась соответствующая выбранной модели запись из поля <Чувствительность> БД.
Подскажите как это можно реализовать.
edit5.Text := ???
Пробовал так:
Код:
procedure TForm1.DBLookupComboBox1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT модель, чувствительность FROM Speaker WHERE модель = DBLookupComboBox1.Text');
ADOQuery1.Open;
edit5.Text := ADOQuery1.FieldByName('чувствительность').AsString;
end;
Админ: Пользуемся тегами для оформления кода!
В результате после запуска проги как только я кликаю на нужную запись в DBLookupComboBox1 появляется сообщение об ошибке следующего содержания - <... параметр чувствительность не имеет значения по умолчанию.>