pesquisa por cep gera erro

[maquinavirtual 0]

Estou utilizando delphi 7 e estou com a seguinte duvida, na minha aplicacao coloquei um codigo que realiza a consulta de cep fornecendo o estado cidade e bairro e tambem rua. Ele realiza a pesquisa utilizando um webservice. Ele funciona corretamente, porem se o usuario digitar um cep que nao existe ele me retorna um erro:

 

Código do erro:
Projeto exe raised exception class EvariantTypeCastError with message
could not convert variant of type (null) into type (string). Process stoped.
Use run continue.

O codigo do pesquisacep peguei aqui:

http://www.republicavirtual.com.br/b...hi_7/#delphi_7

 

Gostaria de inserir uma mensagem para o usuario dizendo que o cep nao existe.

Como posso tratar esse erro?

Aguardo resposta.

[wllf 2]

Colega aparentemente o link está quebrado, mas em qual evento você colocou o código ?

 

Caso seja no OnChange de um TEdit ou OnClick de um botão você tem que tratar o evento para que só seja disparado quando o parâmetro estiver carregado, ou seja o TEdit não estiver vazio.

 

Quanto a mensagem é só mandar verificar se a query está vazia, caso sim nenhum endereço foi encontrado com esse CEP.

 

Agora para validação de CEP aí é outra coisa.

 

Claro estou supondo !!!

[fernando.fxsoft 0]

Olá,

 

 

Realmente o link com o código está quebrado, mas pelo que parece o retorno do webservice é uma variável tipo Variant e está retornando Null. Você terá que fazer alguma checagem disto antes de tentar converter para uma String.

 

Um abraço,

 

 

Fernando

[maquinavirtual 0]

Olá,

 

 

Realmente o link com o código está quebrado, mas pelo que parece o retorno do webservice é uma variável tipo Variant e está retornando Null. Você terá que fazer alguma checagem disto antes de tentar converter para uma String.

 

Um abraço,

 

 

Fernando

 

link corrigido

http://www.republicavirtual.com.br/busca_de_cep/Delphi_7/#delphi_7

 

aguardo resposta.

 

Colega aparentemente o link está quebrado, mas em qual evento você colocou o código ?

 

Caso seja no OnChange de um TEdit ou OnClick de um botão você tem que tratar o evento para que só seja disparado quando o parâmetro estiver carregado, ou seja o TEdit não estiver vazio.

 

Quanto a mensagem é só mandar verificar se a query está vazia, caso sim nenhum endereço foi encontrado com esse CEP.

 

Agora para validação de CEP aí é outra coisa.

 

Claro estou supondo !!!

 

link corrigido

http://www.republicavirtual.com.br/busca_de_cep/Delphi_7/#delphi_7

 

aguardo resposta.