Coloque no evento OnExit do componente:
try
StrToDate((Sender As TDBEdit).Text);
except
ShowMessage('Data inválida');
(Sender As TDBEdit).SetFocus;
end; __________________________________________________ Fa�a liga��es para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
