Antes de nada, te recomiendo que utilices TAG's (
Utilización de TAG's) en tus mensajes, ya que facilitará la lectura de código (en éste caso te lo modifico yo).
En cuanto al error de compilación, prueba a cambiar la deficición de las variables H,Size de integer a
Cardinal. Creo que con eso debería bastar.
Código Delphi
[-]
procedure ImprimirApi;
var
Size, H:Cardinal;
Info: PAddJobInfo1;
F: TextFile;
begin