Erro na consulta
A onde estou errando com este código?
Me retorna um erro dizendo que o LIKE não existe:
procedure TFrm_Principal.BtPesquisaClick(Sender: TObject);
Var
Campo:String;
begin
WITH Dmdados.IBqCliente do
Begin
Close;
Sql.Clear;
Sql.Text:='Select * From TabOrcamento Where '+ Campo +' LIKE :ParamNome';
ParamByName('ParamNome').asString:='%'+EdtPesquisa.Text+'%';
SQL.Add('Order By Nome_cli');
Open;
end;
Me retorna um erro dizendo que o LIKE não existe:
Erivan Marinho
Curtidas 0
Respostas
Bruno Leandro
23/10/2012
voce ta declando a variavel Campo mas nao ta atribuindo nenhum valor pra ela informando qual o campo sera pesquisado
GOSTEI 0
Erivan Marinho
23/10/2012
Tem como me explicar melhor amigo?
Por favor.
Por favor.
GOSTEI 0
Alessandro Yamasaki
23/10/2012
Esta linha
Sql.Text:='Select * From TabOrcamento Where '+ ???Campo??? +' LIKE :ParamNome';
Se verificar seu trecho, verificará que a variavel "Campo" não é preenchida.
Sql.Text:='Select * From TabOrcamento Where '+ ???Campo??? +' LIKE :ParamNome';
Se verificar seu trecho, verificará que a variavel "Campo" não é preenchida.
GOSTEI 0
Alisson Santos
23/10/2012
Poderia postar o código inteiro dessa ação, pois tem que declarar a variavel campo atribuindo a ela o seu edit entendeu. pois no seu select você passa o campo e como parametro pede o que está digitado no edit.
GOSTEI 0