Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works
Anything · Lazarus or Delphi
Random projectRandom project

ConsultaCEP

Biblioteca para Delphi de ConsultaCEP usado a API da ViaCEP

View on GitHub

Member rating

No ratings yet.

Sign in to rate this project.

README

Consulta CEP com Delphi - ViaCEP

Utilizar no seu projeto

Adicionar as units ConsultaCEP.Consulta.pas e ConsultaCEP.Logradouro.pas que estão na pasta Lib.

Exemplo de uso

pascal

var
  sRetorno : String;
begin
  mmRetorno.Lines.Clear;

  if TConsultaCEP.Consultar(edtCEP.Text, sRetorno) then
  begin
    var cep : TCEPRetorno;
    cep := TJson.JsonToObject<TCEPRetorno>(sRetorno);

    ShowMessage('Logradouro: ' + cep.Logradouro + sLineBreak +
                'Complemento: ' + cep.Complemento + sLineBreak +
                'Bairro: ' + cep.Bairro  + sLineBreak +
                'Localidade: ' + cep.Localidade  + sLineBreak +
                'UF: ' + cep.UF + sLineBreak +
                'Unidade: ' + cep.Unidade + sLineBreak +
                'IBGE: ' + cep.IBGE + sLineBreak +
                'GIA: ' + cep.GIA);
  end
  else
  begin
    ShowMessage('CEP Inválido');
  end;
end;

CEP desatualizado?

Informe a ViaCEP através do link Atualizar CEP