Controlar insercion de fecha y hora en una tabla paradox

[marcoszorrilla]

Prueba con este ejemplo, un poco forzado pero funciona:

Bájate un TApplicationEvents lo tienes en la paleta adicional y para interceptar este error de conversión, que no la lanza el BDE, sino Delphi pones este código, solamente pongo el ejemplo con fechas, pero con tiempos funcionará igual interceptando el mensaje correspondiente.

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
  E: Exception);
begin
  if (lowercase(copy(E.Message,(Length(E.Message) - 18),19 )))='is not a valid date' then
  Application.MessageBox('La fecha introducida no es correcta','Atención',mb_Ok +
  mb_IconQuestion);
end;

Un Saludo.