1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

var
   aJobs : Array[0..5000] of JOB_INFO_2;
   StatusLog:String;
   //...

      SetJob(hPrinter, aJobs[i].JobId, 0, 0, JOB_CONTROL_CANCEL);

      //Hier liegt das Problem: !!!!!!!!!!!!!!!!!!!!!!!!!!!!
      StatusLog := DateToStr(SystemTimeToDateTime(aJobs[i].Submitted)) + ' - '+
                   TimeToStr(SystemTimeToDateTime(aJobs[i].Submitted)) + ' - ' +
                   StrPas(aJobs[i].pDocument) + ' - '+ IntToStr(aJobs[i].Size);