Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Редакторы текста, отчеты / Существует ли способ для определение числа заданий spoolerа печати?

Существует ли способ для определение числа заданий spoolerа печати?

Spoolerа печати Windows посылает WM_SPOOLERSTATUS каждый раз при добавлении и удалении заданий в очереди печати. В следующем примере показано как перехватить это сообщение
Пример:

     type
       TForm1 = class(TForm)
     Label1: TLabel;
       private
     { Private declarations }
     procedure WM_SpoolerStatus(var Msg : TWMSPOOLERSTATUS);
       message WM_SPOOLERSTATUS;
       public
     { Public declarations }
       end;

     var
       Form1: TForm1;

     implementation

     {$R *.DFM}

     procedure TForm1.WM_SpoolerStatus(var Msg : TWMSPOOLERSTATUS);
     begin
       Lable1.Caption := IntToStr(msg.JobsLeft) +
             ' Jobs currenly in spooler';
       msg.Result := 0;
     end;

Источник: Дельфи. Вокруг да около.

Copyright ©   "Мастера DELPHI"   E-mail:   delphi@mastak.com  http://www.delphimaster.ru

Источник получения информации: http://www.delphimaster.ru