Comparando valores nulos

[pyanqn]

Hola. tengo una base de datos, y una table que puede contener valores de fecha nulos, ahora es necesario conocer si el valor contenido en el campo es nulo o no, la pregunta es como comparo valores nulos?

[delphi]

if (datasource.dateset['fecha'] = Null )then

[delphi/]

Esto no funciona.

[[Lepe]]

Tienes varias formas:

Código Delphi [-]

if varIsNull(datasource.dateset['fecha'] ) then 
  showmessge('nulo');

if datasource.dateset['fecha'].IsNull then 
  showmessge('nulo');

Para el primer método, tienes que añadir el Uses Variant;

saludos

[pyanqn]

funciona igual si lo que tengo es un Query, en lugar de un datasource?

[jachguate]

Empezado por pyanqn

funciona igual si lo que tengo es un Query, en lugar de un datasource?
Editar/Borrar Mensaje

la propiedad DataSet de cualquier datasource es, en efecto, un TDataSet, y TQuery es un TDataset.

[pyanqn]

Tengo un problemita, ¿acaso esta funcion varisNull, booleana trabaja con logica inversa?

Para ver si un campo era nulo, era un campo de fecha, hice:

Código Delphi [-]

if not VarIsnull(algo) then
//Aqui un error

[[Lepe]]

Y ¿ese algo que es? porque dependiendo de lo que pongas, tiene un significado u otro.

saludos

[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');

[vtdeleon]

Saludos

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');

Y lo que quieres es....?

No se si no estoy captando

[lucasarts_18]

Empezado por pyanqn

Para ver si un campo era nulo, era un campo de fecha, hice:

Código Delphi [-]
 if not VarIsnull(algo) then
//Aqui un error

[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.