GARANTIR DESCONTO

Fórum Maskedit #180206

05/09/2003

0

pessoal estou utilizando um maskedit em minha aplicação e gostaria de saber o que vocês acham:

nesse maskedit são os usuários que entraram com os dados:

Como consigo validar a data que é digitada?

exemplo:

__/_9/___3_

__/__/_____

Se alguém puder me ajudar a validar as datas.


Mineiro

Mineiro

Responder

Posts

05/09/2003

Vinicius2k

Function IsDate(DateString: String): Boolean; Begin Try StrToDateTime(DateString); Result := True; except on EConvertError do Result := False; End; End; procedure TForm1.Button1Click(Sender: TObject); begin if isdate(maskedit1.text) then showmessage (´Data correta!´) else showmessage (´Data incorreta!´); end;


T+


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar