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

Увы появляется всё таже ошибка - <... параметр чувствительность не имеет значения по умолчанию.> И в 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
Ответить с цитированием