[tgm]

Добрый день. Вопрос очень тупой, прошу помочь.

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

незнаю доступоно ли обяснил
на всякий случай прикрепил сорс