Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
renanbenevelli Novato
Registrado: Quarta-Feira, 18 de Abril de 2007 Mensagens: 36
|
Enviada: Ter Mai 01, 2007 11:54 am Assunto: como limpar o dbgrid ? |
|
|
estou usando um dbgrid para consulta, e gostaria q qdo começasse a digitar no edit, o dbgrid fosse limpando e aparecendo apenas o q eu fosse digitando, tipo digitei "RE" e aparecesse todos os nomes com re, tipo, renato, renan , renata, reginaldo ... etc ....
estou usando esse código para consulta...
IBDataSet1.Locate('NOME',Edit2.Text,[ loPartialKey ]);
espero retorno.
obrigado... |
|
Voltar ao Topo |
|
|
renanbenevelli Novato
Registrado: Quarta-Feira, 18 de Abril de 2007 Mensagens: 36
|
Enviada: Ter Mai 01, 2007 11:56 am Assunto: |
|
|
?????????? |
|
Voltar ao Topo |
|
|
pestana Colaborador
Registrado: Sábado, 25 de Junho de 2005 Mensagens: 3147 Localização: Araras-SP
|
Enviada: Ter Mai 01, 2007 2:34 pm Assunto: |
|
|
eu não me lembro com usar o locate, mas se vc quiser utilizar o select é só uzar o like:
Select *
From nomeTabela
Where nomeCampo Like QuotedStr(valor + '%');
flw. _________________ Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso. |
|
Voltar ao Topo |
|
|
renanbenevelli Novato
Registrado: Quarta-Feira, 18 de Abril de 2007 Mensagens: 36
|
Enviada: Ter Mai 01, 2007 7:14 pm Assunto: |
|
|
blz pestana, mas como faço pra limpar o dbgrid ?
valew... |
|
Voltar ao Topo |
|
|
edibertoalves Experiente
Registrado: Segunda-Feira, 15 de Agosto de 2005 Mensagens: 447 Localização: São Paulo - SP
|
Enviada: Ter Mai 01, 2007 8:28 pm Assunto: |
|
|
Olá!
Talvez esse exemplo te ajuda seguindo a lógica do pestana!
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
clientdataset1.Close;
ClientDataSet1.CommandText := 'select * from EMPLOYEE where first_name like ' + quotedstr(edit1.Text + '%');
ClientDataSet1.Open;
end;
[]´s _________________ Ediberto Alves
Blog: http://edibertoalves.com.br/blog
Twitter: http://twitter.com/edibertoalves
|
|
Voltar ao Topo |
|
|
renanbenevelli Novato
Registrado: Quarta-Feira, 18 de Abril de 2007 Mensagens: 36
|
Enviada: Qua Mai 02, 2007 10:18 am Assunto: |
|
|
Ola ediberto, obrigado pela resposta...
mas o comando
IBDataSet1.CommandText := 'select * from cliente where NOME like ' + quotedstr(Edit2.Text + '%');
ta dando erro no CommandText, parece q não tem essa função no meu delphi....
valew! |
|
Voltar ao Topo |
|
|
Help_Desk Aprendiz
Registrado: Segunda-Feira, 24 de Outubro de 2005 Mensagens: 250 Localização: Porto Alegre / RS
|
Enviada: Qua Mai 02, 2007 10:53 am Assunto: |
|
|
bl renanbenevelli ?
se eu intendi . tenti
coloque por exemplo um botão Chamado Limpar e nele vc fassa
IBDataSet1.close;
windows.setfocus(edit.handle);
qq coisa poste novamente.
Espero ter ajudado _________________ "A mente que se abre a uma nova idéia jamais
volta ao seu tamanho original." (Albert Einstein). |
|
Voltar ao Topo |
|
|
renanbenevelli Novato
Registrado: Quarta-Feira, 18 de Abril de 2007 Mensagens: 36
|
Enviada: Qua Mai 02, 2007 11:38 am Assunto: |
|
|
bl colorado...
tipo...
o botão limpa de boa o dbgrid, só q fecha ele...
dai num da pra fazer a consulta!!!
valew! |
|
Voltar ao Topo |
|
|
Help_Desk Aprendiz
Registrado: Segunda-Feira, 24 de Outubro de 2005 Mensagens: 250 Localização: Porto Alegre / RS
|
Enviada: Qua Mai 02, 2007 11:51 am Assunto: |
|
|
então . . . qd vc for realizar a consulta vc abre o dataset
tipo
IBDataSet1.open; _________________ "A mente que se abre a uma nova idéia jamais
volta ao seu tamanho original." (Albert Einstein). |
|
Voltar ao Topo |
|
|
|