Código Delphi [-] if VarIsNull (DataSource1.dataset['FECHA'].asDate) then messagedlg('No se puede cambiar la fecha');
if VarIsNull (DataSource1.dataset['FECHA'].asDate) then messagedlg('No se puede cambiar la fecha');