como tratar Erro no campo data

Delphi

03/05/2008

Fiz um pequeno cadatro de clientes, e gotaria de tratar o erro que dispara quando colocamos a data de maneira errada. em que evento faço o tratamento e qual o código.
agradeço.


Benilton

Benilton

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

03/05/2008

Qual o erro que retorna?
Qual banco usa?
Que componentes de acesso usa?
em que momento acontece o erro?
passe essas informações que facilita a ajuda! :wink:


GOSTEI 0
Mazzi

Mazzi

03/05/2008

Olah, recomendo que vc use componentes prontos para tratar campos do tipo data, ex: TRxLib (components) ou outro(s) semelhantes, visto que vc pode por exemplo, tratar assim:

procedure .................
begin
[color=red:6a6ceab99a] try[/color:6a6ceab99a]
<seu codigo aqui>
[color=red:6a6ceab99a] except[/color:6a6ceab99a]
[b:6a6ceab99a] ShowMessage(´Data Invalida´);
exit;[/b:6a6ceab99a]

[color=red:6a6ceab99a] end;[/color:6a6ceab99a]

end;


Se num for algo do tipo, creio que precisamos de mais informacoes pra lhe ajudar.

Abracos++


GOSTEI 0
Catunda

Catunda

03/05/2008

Se vc criou a variável no seu DataSet, coloque o código abaixo no evento OnSetText da variável:

try
if Text= ´ / / ´ then sender.Clear
else sender.AsString:=Text;
except
on e:econverterror do
begin
showmessage(´A Dada Digitada : ´+Text+´ Não Corresponde a Uma Data Válida´);
abort;
end;
end;


GOSTEI 0
POSTAR