Dúvidas com Datas
03/02/2006
0
olá pessoal tudo bem com vcs?
Gostaria de saber como faço para que o usuário não digite a data anterior do sistema , ou seja, que dê entrada a partir do horário do sistema.
Por favor, como faço para proceder? Com um maskedit ou datetimepicker???
Agradeço antecipadamente.
Gostaria de saber como faço para que o usuário não digite a data anterior do sistema , ou seja, que dê entrada a partir do horário do sistema.
Por favor, como faço para proceder? Com um maskedit ou datetimepicker???
Agradeço antecipadamente.
Edibertoalves
Curtir tópico
+ 0
Responder
Posts
03/02/2006
Marco Salles
nao seria isto ??
entre outras opções
[b:330e3fddf6]Mas cuidado com a mascara do MaskEdit....[/b:330e3fddf6]
entre outras opções
procedure TForm1.Button1Click(Sender: TObject); var erro:Boolean; begin try try erro:=True; if StrToDate(MaskEdit1.Text) < Date Then showmessage(´Data Inferior´); erro:=False; except on E:EConvertError do showmessage(´Data Invalida´); end; finally if erro Then MaskEdit1.SetFocus; end; end;
[b:330e3fddf6]Mas cuidado com a mascara do MaskEdit....[/b:330e3fddf6]
Responder
Clique aqui para fazer login e interagir na Comunidade :)