Fórum Consuta de produtos em vários campos #588770

13/11/2017

0

Sou novo no Delphi e estou tentando fazer uma busca de produtos usando parte dos campos "descrição e grupo" do banco de dados.


procedure TFrmProdutos.Button4Click(Sender: TObject);
begin
DM.FDQuery1.Open('select *from Produtos where descricao like '+QuotedStr('%'+Edit2.Text+'%'));
('and grupo like ' +QuotedStr('%'+Edit2.Text+'%'));

end;

end.

Se a busca for feita apenas na primeira linha (descrição), o sistema roda sem problemas, mas se incluir a segunda linha (grupo) recebo o seguinte erro:

Statemente expected, but expression of type "string' found

Se alguém puder me ajudar, agradeceria muito
Decio

Decio

Responder

Posts

13/11/2017

Raimundo Pereira

Qual o banco de dados ?
O campo grupo é string ou integer?
Responder

Gostei + 0

13/11/2017

Natanael Ferreira

Teste assim:
procedure TFrmProdutos.Button4Click(Sender: TObject);
begin
  DM.FDQuery1.Open('select *from Produtos where descricao like ' + QuotedStr('%' + Edit2.Text + '%')
    + ' or grupo like ' + QuotedStr('%' + Edit2.Text + '%'));
end;
Responder

Gostei + 0

13/11/2017

Natanael Ferreira

Corrigindo. Teste assim:
procedure TFrmProdutos.Button4Click(Sender: TObject);
begin
  DM.FDQuery1.Open('select * from Produtos where descricao like ' + QuotedStr('%' + Edit2.Text + '%')
    + ' or grupo like ' + QuotedStr('%' + Edit2.Text + '%'));
end;
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar