Fórum Componente AcbrCep carregando dados em uma EDIT. #580144

14/04/2017

0

Boa Tarde, primeiramente gostaria de agradecer a todos que me ajudaram em minhas perguntas e em segundo lugar, gostaria de uma outra ajuda. Estou com o componente ACBRCep, e este componente no event: OnBuscaEfetuada estou com o seguinte codigo:

procedure TfrmCadClientes.ACBrCEPBuscaEfetuada(Sender: TObject);
var
i : integer;

begin
for I := 0 to ACBrCEP.Enderecos.Count -1 do
begin
edtRua2.Text := ACBrCEP.Enderecos[i].Logradouro;
edtComplemento2.Text := ACBrCEP.Enderecos[i].Complemento;
edtCidade2.Text := ACBrCEP.Enderecos[i].Municipio;
cbxUF2.Text := ACBrCEP.Enderecos[i].UF;
edtBairro2.Text := ACBrCEP.Enderecos[i].Bairro;
tpEditCEP2.Text := ACBrCEP.Enderecos[i].CEP;
end;

end;

procedure TfrmCadClientes.tpEditCEPChange(Sender: TObject);
begin
ACBrCEP.BuscarPorCEP(tpEditCEP.Text);

for S := 0 to ACBrCEP.Enderecos.Count -1 do
begin
edtRua.Text := ACBrCEP.Enderecos[s].Logradouro;
edtComplemento.Text := ACBrCEP.Enderecos[s].Complemento;
edtCidade.Text := ACBrCEP.Enderecos[s].Municipio;
cbxUF.Text := ACBrCEP.Enderecos[s].UF;
edtBairro.Text := ACBrCEP.Enderecos[s].Bairro;
end;
end;

como vcs perceberam eu estou com um form e dentro deste form tenho um PageControl e 3 TTabSheets, e dentro destes 3 Tabs eu tenho dois Panel que dentro destes Panels, tenho os campos tpEditCep e tpEditCep2 aonde que digito o CEP e aparece normal, mas ele esta carregando nos outros campos, como faço pra carregar o CEP nos edits normais e o outro CEP nos edits2?
Yuri Menechelli

Yuri Menechelli

Responder

Posts

15/04/2017

Raimundo Pereira

Bom dia!

Fiquei confuso, mas deixa vê se entendi.
Você, tem uma aba de consulta e outra cadastro, você quer que após a consulta os resultados além de estarem nos campos de retorno vá para aba de cadastro também, é isso?

Se entendi errado tente por fotos e explicando como você quer.
Responder

Gostei + 0

15/04/2017

Raylan Zibel

Se a variável "i" for 0, componentes da TabSheets1. Se "i" for 1, componentes da TabSheets2. Assim sucessivamente.

Recomento que você crie um ClientDataSet em memoria e alimente ele com o retorno da consulta (dentro do for, no ACBrCEPBuscaEfetuada). Sem tabs.
Responder

Gostei + 0

19/04/2017

Yuri Menechelli

Consegui eu simplesmente adicionei um outro componente do ACBRCEP e configurei tudo certinho..
Responder

Gostei + 0

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

Aceitar