fiz uma funcao pra vc aqui esta function Fdata(const s: string): boolean; begin try StrtoDate(S); Result := true; except Result := false; end; end;
coloque no seu codigo o seguinte if Fdata(Copy(Tabela2Campotexto.Value,15,10)) then Tabela1Campodata.Value := StrToDate(Copy(Tabela2Campotexto.Value,15,10)); ----- Original Message ----- From: "Trama Paulista .:sites .:sistemas" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Thursday, September 09, 2004 2:28 PM Subject: [delphi-br] Data Inv�lida Estou fazendo uma leitura de um trecho de um campo de uma tabela para m campo de outra tabela. Entretanto, eu gostaria de testar se o conte�do est� correto. Eu procedo da seguinte forma: Tabela1Campodata.Value := StrToDate(Copy(Tabela2Campotexto).Value,015,010)); O conte�do deste Copy � '21/12/2004' , mas �s vezes acontece de o conte�do ser inv�lido, por exemplo, '56789 '. Eu gostaria de saber se h� como checar se o comando acima deu erro para da� desconsider�-lo, ou seja, verficar se seu conte�do � realmente uma data. Existe alguma rotina para tratamento de erros? desde j�, obrigado. Magno [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 -- <<<<< 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
