Consulta Sql FireBird

Question

Quando executo essa consulta colocando o nome do cliente ela n�o retorna nenhum nome; quando coloco apenas uma letra, por exemplo, �C� ela retorna todos os nome que inicie com a letra �C�. O que esta ...

Christian_adriano · Answer

Ol� colega, tente o seguinte:[code:1:c568b51f39]  with qbcli do begin     Close;      SQL.Text := �Select * From TLBCLIENTES Where Upper(Nome) LIKE upper(:Nm)�;      ParamByName(�Nm�).AsString := AnsiUpperCase(msk.Text+ ���);      Open;   end; [/code:1:c568b51f39]t+...

Macario · Answer

Ol� colega, tente da forma abaixo....[quote:373a054da6]procedure TF_Cadastro.BitBtn9Click(Sender: TObject); begin case rgr.ItemIndex of //rgr = RadioGroup ; qbcli = IBQuery 0: // Nome; begin qbcli.Close; qbcli.SQL.Clear; qbcli.SQL.Add(�Select * From TLBCLIENTES Where Nome Like :Nm�); qbcli.ParamByName(�Nm�).AsString := [b:373a054da6]QuotedStr[/b:373a054da6](msk.Text)+[b:373a054da6]QuotedStr[/b:373a054da6]( ���); qbcli.Open; end;[/quote:373a054da6]espero que ajude.......

Marcio.theis · Answer

Se quiser ainda pode fazer desta forma:[code:1:7cc43f7269]procedure TF_Cadastro.BitBtn9Click(Sender: TObject); begin case rgr.ItemIndex of //rgr = RadioGroup ; qbcli = IBQuery 0: // Nome; begin qbcli.Close; qbcli.SQL.Clear; qbcli.SQL.Add(�Select * �);qbcli.SQL.Add(�From TLBCLIENTES�);qbcli.SQL.Add(�Where Nome Like :Nm�); qbcli.ParamByName(�Nm�).Value:=��� + msk.Text + ���; qbcli.Open; end; [/code:1:7cc43f7269]...

Jose · Answer

Obrigado pessoal.
Testei todos e esse funcionou legal

with qbcli do begin
Close;
SQL.Text := �Select * From TLBCLIENTES Where Upper(Nome) LIKE upper(:Nm)�;
ParamByName(�Nm�).AsString := AnsiUpperCase(msk.Text+ ��);
Open;
end;

F�rum Consulta Sql FireBird #284567