campo vacio

[[oscarac]]

Saludos
Hice esta pequeña funcion para saber si un campo de una tabla esta vacio

Function campovacio(campo: variant): boolean;
Begin
Result:= campo = '';
End;

Me funciona en texto pero en campo fecha no
He notado q a pesar de que el campo esta vacio tiene el valor de '12:00:00am' y me aparece el siguiente mensaje

Could not convert variant of type string into type date

Alguien me da una mano? O tiene alguna idea mejor?

Gracias