Dm_Dados.Tb_Clientes.Open;
Dm_Dados.qryClientes.Close;
Dm_Dados.qryClientes.SQL.Clear;
Dm_Dados.qryClientes.SQL.Add('select * from clientes');
Dm_Dados.qryClientes.SQL.Add('where Nome= :nome');
Dm_Dados.qryClientes.parameters.parambyname('nome').value :=
edtPesquisaNome.text;
Dm_Dados.qryClientes.Open;



2008/12/8 marcio <[EMAIL PROTECTED]>

>   bom dia,
>
> estou querendo fazer uma consulta ao estilo digite o nome do cliente no
> meu projeto, tenho no meu form um TEdit(edtPesquisaNome) e um
> TSpeedeButton(spdPesquisar) que qd no OnClick do mesmo ele deve fazer a
> pesquisa e mostrar o result num TDBGrid:
>
> Dm_Dados.Tb_Clientes.Open;
> Dm_Dados.qryClientes.Close;
> Dm_Dados.qryClientes.SQL.Clear;
> Dm_Dados.qryClientes.SQL.Add('select * from clientes');
> Dm_Dados.qryClientes.SQL.Add('where Nome=');
> Dm_Dados.qryClientes.Open;
>
> Como posso fazer isso?
>
> Grato
>
>  
>



-- 
Felipe Govoni
---------------------
Programador
Fone 8472-8718


[As partes desta mensagem que não continham texto foram removidas]

Responder a