Olá é simples... seu código está correto
Com o projeto aberto, entre em TOLLS DEBUGGER OPTIONS
acesse a paleta Language Exceptions
e desabilite a opção Stop On Delphi Exceptions
eh só...
assim todos os erros do seu projeto devem ser tratados por você!!!
eu apenas desabilito essa opção depois que meu sistema estiver completo...
pois é bom pegar os errinhos durante a fase de construção...
mas se estiver tudo bem mande bala!!!
Um abraço
Bruno Coelho
- Original Message -
From: Erika Lemes
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, February 10, 2005 8:16 PM
Subject: [delphi-br] ME AJUDEM!!! Verificar se uma data string é valida
Bom pessoal, eu já mandei esta mensagem mas não consegui resolver meu
problema e estou com urgência
Eu estou transferindo os dados de um banco access para o paradox, porém no
access ele está declarado como texto e no paradox é date! Eu queria verificar
se a data é válida, pois existem muitos campos com datas como 01/101999 e elas
eu quero descartar.
Estou usando este código:
function tbStrIsDate(const S: string): boolean;
begin
try
StrToDate(S);
Result := true;
except
Result := false;
end;
end;
Para chamar:
if tbStrIsDate(Edit1.Text) then
ShowMessage(Edit1.Text + ' é data válida.')
else
ShowMessage(Edit1.Text + ' NÃO é data válida.');
Porém não sei como fazer para não aparecer o erro quando a data é inválida!!!
Gente me ajudem
Obrigado a todos!!!
-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo!
agora.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo
Horizonte Brasília
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html