Fórum Pesquisa de Clientes no IB #202606
22/12/2003
0
Estou tentando fazer uma pesquisa de clientes estou usando o banco interbase, e os seguintes componentes:SqlConnection, SqlTable, DataSetProvider, ClienteDataSet e o dataSource. mas para a pesquisa não sei q componente usar, gostaria de saber tbém se este comando sql está correto.
´SELECT * FROM CLIENTES WHERE ´+CbPesqCli.Text+´ LIKE(´+QuotedStr(´¬´+EditPesqCli.Text+´¬´)+´)´
´SELECT * FROM CLIENTES WHERE ´+CbPesqCli.Text+´ LIKE(´+QuotedStr(´¬´+EditPesqCli.Text+´¬´)+´)´
Rogsystem
Curtir tópico
+ 0
Responder
Posts
23/12/2003
M_allencastro
:shock: - Se vc esta trabalhando com ClientDataSet, pode usar a função locate sem problemas...
Implementation
uses DB;
no evento onkeypress do EditPesqCli.Text
If Key = #13 Then
Begin
if not DataModule1.ClientDataSet.Locate(CbPesqCli.Text, EditPesqCli.text,
[loCaseInsensitive, loPartialKey]) then
Begin
ShowMessage(´CLIENTE NÂO ENCONTRADO !´);
End Else
Begin
///Procedimentos ou funções a executar
End;
End;
Simples...
Implementation
uses DB;
no evento onkeypress do EditPesqCli.Text
If Key = #13 Then
Begin
if not DataModule1.ClientDataSet.Locate(CbPesqCli.Text, EditPesqCli.text,
[loCaseInsensitive, loPartialKey]) then
Begin
ShowMessage(´CLIENTE NÂO ENCONTRADO !´);
End Else
Begin
///Procedimentos ou funções a executar
End;
End;
Simples...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)