Consulta(Fb 1.5) - Simples

Question

estou conseguindo fazer a consulta com o delphi 7 e firebird 1.5,mas queria fazer ela com coringas,a procedure do botao pesquisar ta assim :[quote:efba43e731]procedure TFrm_Consulta.Btn_PesqClick(Send...

Emerson Nascimento · Answer

na verdade vc deve mudar o operador. vc n�o poder� mais usar o �=�

procedure TFrm_Consulta.Btn_PesqClick(Sender: TObject); 
begin 
  with DmCliente do 
  begin 
    IBQ.Close; 
    IBQ.SQL.Clear; 
    IBQ.SQL.Add(�SELECT * FROM CLIENTE�); 
    IBQ.SQL.Add(�WHERE APELIDO like :apelido�); 
    IBQ.ParamByName(�apelido�).AsString := Copy(Trim(Ed_Pesq.Text)+���,1,TamanhoDoCampo);
    IBQ.Prepare; 
    IBQ.Open; 
  end; 
end

note que esse exemplo procura pelos apelidos [b:9dab583f0f]iniciados[/b:9dab583f0f] com o par�metro informado. vc pode usar outras constru��es para a passagem de par�metros:
Trim(Ed_Pesq.Text)+�� // comece com o valor informado
��+Trim(Ed_Pesq.Text)+�� // contenha o valor informado
��+Trim(Ed_Pesq.Text) // termine com o valor informado

Rafael_iga · Answer

brigado!funcionou perfeitamente!!!  :D  :lol: outra coisa...alguem sabe se tem como �traduzir� ou mudar as mensagens do DbNavigator ????...

Emerson Nascimento · Answer

vc diz dos hint? h� uma propriedades Hints no componente. basta edit�-la....

Rafael_iga · Answer

quando eu cliko nele para deletar.ele aparece :�Delete Record ?�tem como mudar ? :?:...

Emerson Nascimento · Answer

pegue [url=//www.delphibr.com.br/download.php]aqui[/url] as mensagens traduzidas ou leia esse t�pico [url=//forum.clubedelphi.net/viewtopic.php?t=39606]Traduzir mensagem do DBGrid (Ctrl+Del)[/url]...

Rafael_iga · Answer

brigado de novo!aquelas traducoes traduzia os DbNavigator tbm!vlw :lol:  :)  :D  :lol:  :lol:...

F�rum Consulta(Fb 1.5) - Simples #50049