Увы появляется всё таже ошибка - <... параметр чувствительность не имеет значения по умолчанию.> И в Edit5 ни чего не появлятся
У меня на форме имеется ещё два переключателя в зависимости от того какой из них активен устанавливается то или иное значение по умолчанию (при загрузке формы)
Код HTML:
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
if radiobutton1.Checked = true then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT Speaker.[Код], Speaker.[Тип], Speaker.[Модель], Speaker.[Чувствительность (ДБ)], Speaker.[Мощностные режимы], Speaker.[Формула] FROM Speaker WHERE (((Speaker.[Тип])="потолочный"))');
ADOQuery1.Open;
DBLookupComboBox1.KeyValue := DBLookupComboBox1.ListSource.DataSet.FieldByName(DBLookupComboBox1.KeyField).Value; //Установление значения по умолчанию
DBLookupComboBox1.Refresh;
end;
end;
procedure TForm1.RadioButton2Click(Sender: TObject);
begin
if radiobutton2.Checked = true then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT Speaker.[Код], Speaker.[Тип], Speaker.[Модель], Speaker.[Чувствительность (ДБ)], Speaker.[Мощностные режимы], Speaker.[Формула]FROM Speaker WHERE (((Speaker.[Тип])="настенный"))');
ADOQuery1.Open;
DBLookupComboBox1.KeyValue := DBLookupComboBox1.ListSource.DataSet.FieldByName(DBLookupComboBox1.KeyField).Value; //Установление значения по умолчанию
DBLookupComboBox1.Refresh;
end;
a2.jpg