Показать сообщение отдельно
  #1  
Старый 04.03.2012, 11:11
tgm tgm вне форума
Прохожий
 
Регистрация: 25.03.2009
Сообщения: 2
Репутация: 10
По умолчанию ошибка в связке dbgrid+combobox

Добрый день. Вопрос очень тупой, прошу помочь.
Цитата:
procedure TForm1.FormCreate(Sender: TObject);

begin

with ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT * FROM main');
SQL.Add('ORDER BY id');
Open;
end;
with ADOQuery2 do begin
Close;
SQL.Clear;
SQL.Add('SELECT DISTINCT product FROM main');
SQL.Add('ORDER BY product');
Open;
end;
ADOQuery2.First;
While not ADOQuery2.Eof do begin
ComboBox1.Items.Add(ADOQuery2.Fields[0].Text);

ADOQuery2.Next;
end;


end;

Цитата:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
with ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT * FROM main');
SQL.Add('WHERE product ='+ComboBox1.Text);
SQL.Add('ORDER BY product');
Open;

end;

end;

end.

если тип поля число работает прекрасно, а если там текст выходит ошибка. В данном коде у меня product - текстовое поле. И при выборе любого значения из комбобокс выходит ошибка - parameter XX has no default value

незнаю доступоно ли обяснил
на всякий случай прикрепил сорс
Вложения
Тип файла: rar Comb - Copy.rar (574.2 Кбайт, 0 просмотров)
Ответить с цитированием