Konwersja kodu z Delphi na C++ Builder

Witam!
Potrzebuję odpowiednik poniższego kodu w C++, będę wdzięczny za pomoc! [browar]

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;

W pliku nagłówkowym formy (domyślnie Unit1.h), w sekcji private dodaj:

MESSAGE void __fastcall WMSpoolerStatus(TWMSpoolerStatus &Message);

W sekcji public dodaj mapę komunikatów (poniżej __fastcall TForm1(TComponent* Owner); ):

public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
BEGIN_MESSAGE_MAP
  MESSAGE_HANDLER(WM_SPOOLERSTATUS, TWMSpoolerStatus, WMSpoolerStatus)
END_MESSAGE_MAP(TForm)

W pliku źródłowym (domyślnie Unit1.cpp) dodaj:

void __fastcall TForm1::WMSpoolerStatus(TWMSpoolerStatus &Message)
{
  Label1->Caption = IntToStr(Message.JobsLeft) + " Jobs currenly in spooler";
  Message.Result = 0;
}

Wielkie dzięki Jack!