lo solucione asi
fecha1:TDate;
fecha2:TDAte;
noches: integer;
noches:=trunc(fecha1-fecha2);
lo raro de esto es que no funciona si se quiere asignar el resultado de la función trunc a un parámetro de un procedimiento almacenado...
IBStoredProc2.Params.ParamValues['noches'].asInteger:=trunc( fecha2 - fecha1);
Da el siguiente error:
internal error e6724
Hay que ahcer la asignación mediante una variable como en el ejemplo
da un error interno
|