Scalabium Software

• Delphi/C++Builder
  • VCL components
  • Database/SQL
  • Reports, printing
  • Email, Internet
  • Windows API
  • Menu
  • Tools API/IDE
  • OLE, COM, DDE
  • Files, drives, network
  • Algorithmes
  • Conversions
  • Multimedia
  • Miscellaneous
• .NET/C#
  • Database
  • Conversions
  • Miscellaneous
  • Files, drives, network
  • OLE/Interop
  • Visual controls
  • Multimedia, images
• Java

If you need detect how many jobs are in the MS Windows print spooler, then you must handle a WM_SPOOLERSTATUS message. When job is added or deleted in the spooler querue, this message will be broadcast.
So you must create a message handler for this message trapping:

type
  TyourForm = class(TForm)
  private
    { Private declarations }
    procedure WMSpoolerStatus(var Msg: TWMSpoolerStatus);
      message WM_SPOOLERSTATUS;
  public
    { Public declarations }
  end;

implementation

{$R *.DFM}

procedure TyourForm.WMSpoolerStatus(var Msg: TWMSpoolerStatus);
begin
  ShowMessage('Now in the spooler a ' + IntToStr(msg.JobsLeft) + ' jobs';
  msg.Result := 0;
end;

Published: November 26, 1999

Copyright© 1998-2024, Scalabium Software. All rights reserved.
webmaster@scalabium.com