Добрый день. Вопрос очень тупой, прошу помочь.
Цитата:
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
незнаю доступоно ли обяснил
на всякий случай прикрепил сорс