Defina no EditMask   !99/99/9999;1;_

O usuario podera digitar 08/11/04

No evento OnExit, converta o que foi digitado para DATA, da seguinte forma:

  if MskData.Text = '  /  /    ' then
     begin
      ShowMessage('Digite a data.') ;
      MskData.setfocus ;
      exit ;
     end;

  try
     MskData.Text := DateToStr(Strtodate(MskData.Text)) ;
  except
     Showmessage('Data inválida. Corrija por favor.') ;
     MskData.Text := '' ;
     MskData.setfocus ;
  end;

  ----- Original Message ----- 
  From: Erika 
  To: [EMAIL PROTECTED] 
  Sent: Sunday, November 07, 2004 4:08 PM
  Subject: [delphi-br] Formatar Data



  Olá... boa tarde!

  Eu tenho um campo (MaskEdit) para data e queria saber como fazer o 
  seguinte: se o usuário digitar 11/12/04 quando ele sair (OnExit) 
  aparecer 11/12/2004.
  Como eu faço isso?
  Obrigado gente!
  []á





  -- 
  <<<<< 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: 
             
             
                      
             
       


------------------------------------------------------------------------------
  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

 



Responder a