[uper]

ya lo comprobe y no funciona poner un null, compile el programa y no me da error alguno pero al ejecutarse ese procedimiento me dice:
'Invalid varian type conversion'

Tambien comprobe haciendo un cambio de value por AsDateTime y aun da ese error invalid varian...

Código Delphi [-]
 While not tbClienteOrigen.Eof do
  begin
 tbClienteDetID.value:=tbClienteOrigenID.value;
 tbClienteDetAnotacion.value.=tbClienteOrigenAnotacion.value;
  if not tbClienteOrigenFechaInicio.isnull then
   tbClienteDetfechaInicio.value:= tbClienteOrigenFechaInicio.value
  else 
     tbClienteDetfechaInicio.AsDateTime:=null;
  if not tbClienteOrigenFechaFinal.Isnullthen
   tbClienteDetfechaFinal.value:= tbClienteOrigenFechaFinal.value;
 else
  tbClienteDetfechaFinal.AsDateTime:=null; 
 and string
 tbClienteDetActivo.value:='A';
 tbClienteOrigen.next;
  
 end

por que hace esto ?