Como colocar o codigo e aparecer o nome do cliente

04/01/2020

13

Hola
Boa tarde
Estou com dificuldades em fazer uma parte do programa que estou desenvolvendo em delphi é uma tela de cadastro de veiculos onde eu cadastro o chassis modelo serie cor e vincula pelo nome do proprietario, já fiz a tela de cadastro de cliente e o codigo do cliente é o id, aminha duvida é a seguinte que pegar no formulario de cadastro de veiculo o codigo do cliente e ele me retornar em uma dbedit o nome do cliente e gravar na dbgrid do cadastro do veiculo sem botao de busca automaticamente ao dar tab ele preencher automaticamente
Responder

Posts

Fala boy,

Seguinte...

Use um edit e não um dbedit

Use uma ADOQuery

No evento OnExit do Edit coloque esse código;

begin
With ADOQuery1 do
begin
close;
sql.clear;
sql.add('Select * from Tabela');
sql.add('where Campo = :Parametro');
parameters.parambyname('parametro').value := Edit1.Text;
open;
if ADOQuery1.Recordcount = 0 then
ShowMessage('Código não encontrado')
else
begin
Edit2.Text := ADOQuery1.FieldByName('Modelo').AsString;
Edit3.Text := ADOQuery1.FieldByName('Chassi').AsString;
// Aqui você preenche os edits correspondentes aos seus dados.
end;
End;

Boy se tiver muita dificuldade entra em contato comigo amanhã de manhã

Skype: anderson@case13.com.br
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar