Tem Solução ?
Olá colegas do fórum .
Já perguntei para milhares pessoas em chats delphi e NINGUEM soube responder . Mas como todos sabemos , aqui é o lugar dos VERDADEIROS programadores DELPHI .
Bom , minha dúvida é a seguinte :
Tenho uma tabela chamada Clientes.db
Nela contém os campos Código e Nome .
Criei um form para cadastrar dados nessa tabela .
Mas..... Agora , tenho outra tabela chamada .... Suporte.db
Que contém os seguintes dados :
Ordem
Código
Nome
Também criei um form para essa tabela , aí começa meu dilema !
Gostaria de implementar um código no edit do campo código que fizesse a seguinte função :
QUANDO A PESSOA DIGITAR O CÓDIGO DE ALGUM CLIENTE QUE É CADASTRADO NA TABELA CLIENTES, E PRECIONAR A TECLA ENTER , O EDIT REFERENTE AO CAMPO NOME DA TABELA DE SUPORTES AUTOMATICAMENTE É ESCRITO O NOME DO CLIENTE , DA TABELA CLIENTES , REFERENTE AO CÓDIGO QUE DIGITEI NO EDIT CÓDIGO DO CLIENTE DA MINHA TABELA DE SUPORTE .
Agradeço desde já aos colegas programadores .
Muito Obrigado !
Tiago José Milam
Já perguntei para milhares pessoas em chats delphi e NINGUEM soube responder . Mas como todos sabemos , aqui é o lugar dos VERDADEIROS programadores DELPHI .
Bom , minha dúvida é a seguinte :
Tenho uma tabela chamada Clientes.db
Nela contém os campos Código e Nome .
Criei um form para cadastrar dados nessa tabela .
Mas..... Agora , tenho outra tabela chamada .... Suporte.db
Que contém os seguintes dados :
Ordem
Código
Nome
Também criei um form para essa tabela , aí começa meu dilema !
Gostaria de implementar um código no edit do campo código que fizesse a seguinte função :
QUANDO A PESSOA DIGITAR O CÓDIGO DE ALGUM CLIENTE QUE É CADASTRADO NA TABELA CLIENTES, E PRECIONAR A TECLA ENTER , O EDIT REFERENTE AO CAMPO NOME DA TABELA DE SUPORTES AUTOMATICAMENTE É ESCRITO O NOME DO CLIENTE , DA TABELA CLIENTES , REFERENTE AO CÓDIGO QUE DIGITEI NO EDIT CÓDIGO DO CLIENTE DA MINHA TABELA DE SUPORTE .
Agradeço desde já aos colegas programadores .
Muito Obrigado !
Tiago José Milam
Tiagojmilam
Curtidas 0
Respostas
Rfpsatin
29/09/2003
Deixa ver se entendi.
vc tem uma tabela de clientes com n dados.
tem uma tabela de suporte com dados relevantes a tabela de suporte e um casamento com a de cliente correto?
vc quer q qdo alguém digite no campo código da tabela de suporte o nome do referido cliente da tabela de cliente seja trazido p/ o campo nome da tabela de suporte correto?
bem, se for isto é simples.
vc pode colocar um código no onkeydown do DBEdit de código que faça o seguinte,
if key=vk_return then
begin
try
codigo:=DBEdit1.text;
qry:=Tquery.create(self);
qry.databasename:=´teuAlias´;
qry.sql.add(´select nome from tabcliente where codigo=´ + codigo);
qry.prepare;
qry.open;
DBEdit2.text:=qry.fieldbyname(´nome´).asstring;
finally
FreeAndNil(qry);
end;
end;
vc tem uma tabela de clientes com n dados.
tem uma tabela de suporte com dados relevantes a tabela de suporte e um casamento com a de cliente correto?
vc quer q qdo alguém digite no campo código da tabela de suporte o nome do referido cliente da tabela de cliente seja trazido p/ o campo nome da tabela de suporte correto?
bem, se for isto é simples.
vc pode colocar um código no onkeydown do DBEdit de código que faça o seguinte,
if key=vk_return then
begin
try
codigo:=DBEdit1.text;
qry:=Tquery.create(self);
qry.databasename:=´teuAlias´;
qry.sql.add(´select nome from tabcliente where codigo=´ + codigo);
qry.prepare;
qry.open;
DBEdit2.text:=qry.fieldbyname(´nome´).asstring;
finally
FreeAndNil(qry);
end;
end;
GOSTEI 0