Boa Tarde DelphiStar ... Talvez de Ajude ....
procedure TFrmCadProduto.Edit1Change(Sender: TObject); begin DBGrid1.DataSource := FrmDM.DSCadProduto ; FrmDm.CDSCadProduto.filter := 'NOME_PRODUTO LIKE ' + QuotedStr('%'+Edit1.text+'%'); FrmDm.CDSCadProduto.Filtered := true; FrmDm.CDSCadProduto.locate('nome_produto','edit1.text',[loPartialKey]) ; end; Luciano Angelini Prefeitura de Lupionópolis-Pr DelphiStar escreveu: > > Boa Tarde a todos > Estou com um problema que não estou conseguindo resolver > Estou usando Delphi 6 > e gostaria de saber, como eu faço para consultar parte do nome de um > cliente no cadastro > Estou usando SET FILTER > por exemplo, gostaria de fazer um filtro no cadastrom de clientes > para saber todos os clientes que comecem com AS. > Agradeço desde já > Abraço a todos > Ademir > > [As partes desta mensagem que não continham texto foram removidas] > >