Delphi

Вопрос

Подскажите, как программно узнать количество заданий принтера в текущий момент времени, т.е. сколько документов находиться в очереди на печать.

Ответ

Для этой цели применима функция WinApi:

BOOL EnumJobs(
HANDLE hPrinter, // handle to printer object
DWORD FirstJob, // location of first job in print queue to enumerate
DWORD NoJobs, // number of jobs to enumerate
DWORD Level, // structure level
LPBYTE pJob, // pointer to structure array
DWORD cbBuf, // size of array, in bytes
LPDWORD pcbNeeded, // addr. of variable with no. of bytes copied (or required)
LPDWORD pcReturned // addr. of variable with no. of job info. structures copied
);

А если знаешь английский, то прочитай справочку по WinApi программированию, которая поставляется вместе с Delphi. Там все хорошо написано.

Из конференции Expert_FAQ