Componente DBEdit X Tabelas de Dados

Delphi

13/11/2003

Como faço para colocar um DBEdit em um formulário sendo que sempre que eu digitar um valor em seu campo de edição, todos os demais DEEdit sejam atualizados no formulário com os restante dos dadas da tabela.

ex: digito o nº de registro do funcionário no meu principal e nos demais altomaticamente aparecerá o nome, o departamento, endereço e demais.

detalhe: estou utilizando Paradox

obrigado
Fabiano


Fabiano Cg

Fabiano Cg

Curtidas 0

Respostas

Sam

Sam

13/11/2003

No evento ONEXIT do seu DBEDIT (Nº REGISTRO) faça o seguinte:

begin
tabeladeregistro.open; //tabela onde vc fará a consulta
if not tabeladeregistro.findkey([DBEDIT.TEXT]) then //faz a consulta
begin
ShowMessage(´Registro Informado Não Existe´);
DBEdit.SetFocus;
tabeladeregistro.close;
exit;
end;
DbEditNome.text := tabeladeregistronome.text;
DbEditEndereco.text := tabeladeregistroendereco.text;
...
...
...
tabeladeregistro.close;
end;


Espero ter ajudado !!!


GOSTEI 0
Fabiano Cg

Fabiano Cg

13/11/2003

ótimo amigo!
só fiquei com um pouco de dúvida nesta parte:

DbEditNome.text := tabeladeregistronome.text;
DbEditEndereco.text := tabeladeregistroendereco.text;


como na tabela eu me referencio o campo do atributo.


GOSTEI 0
Fabiano Cg

Fabiano Cg

13/11/2003

outra coisa, o meu dtedit esta com a propriedade charcase = ecUpperCase, pois estou usando o dbnavegator. Tem algum problema?


GOSTEI 0
POSTAR