Comparando valores nulos

[jachguate]

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.