Oi pessoal.
Eu queria fazer a verificação da data digitada, sendo que quando o usuario digitar por exemplo 01/01/05 apareça 01/01/2005. estou usando este código no OnExit do campo: if Data <> ' / / ' then begin try MaskEdit1 := FormatDateTime('dd/mm/yyyy', StrToDate(MaskEdit1)); except ShowMessage('Data Inválida !'); end; end; Está funcionando certinho, mas como tenho muitos campos de data, eu achei que seria mais viável criar uma Function para tratar destas datas. Porém se eu executo a Function no OnExit não funciona. Coloquei a function assim: function VerificaData (Data: String): String ; begin if Data <> ' / / ' then begin try Data := FormatDateTime('dd/mm/yyyy', StrToDate(Data)); except ShowMessage('Data Inválida !'); end; end; end; O que pode ser? Obrigado! =====> ERikA -- <<<<< 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