Como Valido Data num Dbedit?
Tenho um Dbedit ligado em uma tabela do Paradox, mas quando tento validar a data contida nele é gerado um erro. Quandi a data é valida ele a apaga.[b:49ec8b787b] O que devo fazer?[/b:49ec8b787b]
[color=darkblue:49ec8b787b]*Obs.*: [/color:49ec8b787b]Estou colocando o código dentro do evento OnSetText, do campo.
[color=darkblue:49ec8b787b]*Obs.*: [/color:49ec8b787b]Estou colocando o código dentro do evento OnSetText, do campo.
Mbressan
Curtidas 0
Respostas
Leandro Jacomete
13/05/2003
Passei pelo mesmo problema!!
aguarde um pouco que vou te passar!!!!!!
aguarde um pouco que vou te passar!!!!!!
Tenho um Dbedit ligado em uma tabela do Paradox, mas quando tento validar a data contida nele é gerado um erro. Quandi a data é valida ele a apaga.[b:9a721d26b5] O que devo fazer?[/b:9a721d26b5]
[color=darkblue:9a721d26b5]*Obs.*: [/color:9a721d26b5]Estou colocando o código dentro do evento OnSetText, do campo.
GOSTEI 0
Adilsond
13/05/2003
Voce está esquecendo de mover o valor para o campo.
procedure TForm1.Table1HireDateSetText(Sender: TField; const Text: String); begin try Sender.AsDateTime := StrToDateTime(Text); except raise EDatabaseError.Create(´Data inválida.´); end; end;
GOSTEI 0