Fórum Pesquisa #169430
15/07/2003
0
Tenho um formulario de pesquisa com codigo SQL e preciso da seguinte orientação:
Ao digitar a primeira letra ele busca o cliente , preciso de quando for localizado o mesmo clicar em cima do nome e ele abrir a tela de cadastro para visualizar os dados do cliente.
Preciso somente do codigo para abrir a tela de cadastro com dois clicles em cima do nome.
Desde já agradeço.
Wesley Francisco
Wesleyfsf@hotmail.com
Ao digitar a primeira letra ele busca o cliente , preciso de quando for localizado o mesmo clicar em cima do nome e ele abrir a tela de cadastro para visualizar os dados do cliente.
Preciso somente do codigo para abrir a tela de cadastro com dois clicles em cima do nome.
Desde já agradeço.
Wesley Francisco
Wesleyfsf@hotmail.com
Wesleyfsf
Curtir tópico
+ 0
Responder
Posts
15/07/2003
Datorre
Olá Wesley
Bom, faço o seguinte, achu q é +- a mesma coisa q vc quer.
façu uma busca em uma determinada tabela, essa busca vai para um dbgrid, quando se clica 2x emcima de um nome, mostro os detalhes deste cliente.
vou dar apenas um exemplo de como pegar o nome do cliente, por exemplo do grid e jogar numa mensagem, isso é o básico de tudo, com isso vc vai mexendo e consegue fazer o q vc quiser.
No evento OnDblClick do dbGrid, coloca:
ShowMessage(Query1.Fields[0].AsString);
cada campo q vc fez a busca está na query, comeácando do 0 os campos estão na ordem q aparecem no dbgrid. Assim vc consegue pegar a informação q quer. depois com isso vc pode jogar o conteúdo em edit´s, por exemplo e dar um Update pra gravar. Mas ae é cum vc...
qq coisa, estamos ae...
Bom, faço o seguinte, achu q é +- a mesma coisa q vc quer.
façu uma busca em uma determinada tabela, essa busca vai para um dbgrid, quando se clica 2x emcima de um nome, mostro os detalhes deste cliente.
vou dar apenas um exemplo de como pegar o nome do cliente, por exemplo do grid e jogar numa mensagem, isso é o básico de tudo, com isso vc vai mexendo e consegue fazer o q vc quiser.
No evento OnDblClick do dbGrid, coloca:
ShowMessage(Query1.Fields[0].AsString);
cada campo q vc fez a busca está na query, comeácando do 0 os campos estão na ordem q aparecem no dbgrid. Assim vc consegue pegar a informação q quer. depois com isso vc pode jogar o conteúdo em edit´s, por exemplo e dar um Update pra gravar. Mas ae é cum vc...
qq coisa, estamos ae...
Responder
Gostei + 0
15/07/2003
Rjanuzzi
Tenho um código pronto, que acabei de fazer, talvez te ajude:
procedure TForm9.DBGrid1DblClick(Sender: TObject);
var
aux: integer;
begin
aux := query1.Fields[0].Value; //-> no seu caso ´.Asstring´
with form2.Table1 do
begin
open;
Locate(´Matricula´,aux,[locaseinsensitive]);
form2.Show;
end;
form9.Hide;
end;
rjanuzzi
procedure TForm9.DBGrid1DblClick(Sender: TObject);
var
aux: integer;
begin
aux := query1.Fields[0].Value; //-> no seu caso ´.Asstring´
with form2.Table1 do
begin
open;
Locate(´Matricula´,aux,[locaseinsensitive]);
form2.Show;
end;
form9.Hide;
end;
rjanuzzi
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)