Cita:
Empezado por pyanqn
lo que en realida estoy haciendo es:
Código Delphi [-]
if VarIsNull (DataSource1.dataset['FECHA'].asDate) then
messagedlg('No se puede cambiar la fecha');
|
La propiedad AsDate de un TField no devuelve un variant, devuelve un TDateTime, por tanto, jamás devolverá un nulo.
Podes comprobar entonces, DataSource1.DataSet['FECHA'].IsNull o bien VarIsNull(DataSource1.DataSet['FECHA'].Value)
Hasta luego.