Exemplo de utilização do web service https://viacep.com.br/ws/ disponível para consulta de CEPs
Pascal
Latest commit 9034a9f Feb 9, 2016 @scsoftwarecta Update README.md
Permalink
Failed to load latest commit information.
.gitignore Initial commit Feb 7, 2016
README.md Update README.md Feb 9, 2016
exemploUtilizacao.txt Create exemploUtilizacao.txt Feb 7, 2016
uEndereco.pas Create uEndereco.pas Feb 7, 2016

README.md

buscaCep

Exemplo de utilização do web service https://viacep.com.br/ws/ disponível para consulta de CEPs

  1. Utilizei o Delphi XE8 para realizar a implementação e testes deste projeto, porém é compatível com as versões anteriores da família XE;
  2. Caso queira/precise compilar a unit uEndereco em uma versão anterior ao Delphi XE, basta realizar alguns pequenos ajustes no "uses" e alterar o código da linha 58 (if Cep.IsEmpty then) por if Cep = '' then
  3. Para conseguir utilizar o exemplo disponível em exemploUtilizacao.txt, primeiro inclua no formulário 4 componentes TEdit e altere a propriedade Name para: eCEP eDS_END eNM_BAIRRO eNM_CIDADE eDS_UF

Qualquer dúvida/sugestão, por favor, entre em contato através do e-mail scsoftware@hotmail.com