Fórum Como localizar registro? #214683

17/02/2004

0

Alguém poderia me ajudar?, meu problema é o seguinte construi um formulário para pesquisar pelo nome em uma tabela Paradox 7, Até ai tudo está funcionando, Mas o que eu quero é o seguinte como eu faço para apresentar os dados do nome localizado como telefone, endereço etc. Em outro formulário quando pressionar enter ou clicar em um botao por exemplo.


Agradeço qualquer ajuda!


Juntal

Juntal

Responder

Posts

17/02/2004

Lucas Silva

Coloca no Sql da query um parametro (a chave da tabela);

quando você quiser localizar é só jogar um valor p/ o parametro....
with query do
 begin
 Close;
 Params[0].Asstring := Edit.text;
 Open; 
;

Você pode usar também o Locate...


Responder

Gostei + 0

17/02/2004

Rodolpho123

Olá amigo!
Vc diz o seguinte: Vc quer que quando vc fechar o seu Formulário pesquisa, os dados desta pesquisa estejam em outro formulário?
Onde está localizada a sua tabela? Em um Form ou DataModule?
Aguardo sua resposta para tentá-lo ajudar.
Abraços..........!


Responder

Gostei + 0

18/02/2004

Juntal

Olá amigo! Vc diz o seguinte: Vc quer que quando vc fechar o seu Formulário pesquisa, os dados desta pesquisa estejam em outro formulário? Onde está localizada a sua tabela? Em um Form ou DataModule? Aguardo sua resposta para tentá-lo ajudar. Abraços..........!



Exatamente isto! tenho um formulario para pesquisa com edit usando locate, e um dbgrid mostrando os dados da tabela, o que eu quero é quando localizar o nome no dbgrid e pressiono um botão o formulario deve ser fechado e os dados daquele nome localizado seja mostrado em outro formulario, no meu formulário coloquei uma table e um datasource.


Obrigado e abraços...


Responder

Gostei + 0

21/02/2004

Godzilla_xf

Olá amigo espero poder te ajudar com esta dica.
vc faz o seguinte

no form onde vc faz a localização do registro por exemplo no botão do form de pesquisa digite:

With TabPesquisa do
begin
close;
filtered := false;
Filter := ´NomeCliente = ´+ QuotStr(Edit1.text);
Filtered := true;
Open;
if TabPesquisa.recordcont <> ´´ then
begin
// localiza o mesmo cliente da tabela de pesquisa no outro form certo
FormCliente.TabCliente.Locate(´NomeCLiente´, TabPesquisa.FieldByName(´NomeCliente´).value, [LoCaseInsensitive, LoPartialKey]);
// essa linha fecha o form de pesquiza pois a condição acima é verdadeira
self.release;
end
else
showmessage(´Cliente não encontrado´);
edit1.setfocus;
end;

espero ter ajudado com essa dica, mais caso vc tenha duvidas mande MP...

blz...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar