Ravereport TRvSystem OnPrint

Hans-Martin

Hallo,
hat jemand eine Idee warum das OnPrint Event nicht stattfindet?
Der Report wird angezeigt und die After und Before Events werden ausgeführt!
Übrigens benutze ich BCB 5.0 Ravereport BEX 5.1.2.

Wenn ich den Report, direkt oder über die Vorschau, zum Drucker schicke gibt es auch keine Meldung vom Event.
Es gibt hier ein Link der beschreibt auf was es hinauslaufen soll:
http://www.nevrona.com/Default.aspx?tabid=117

//--------------------------------------------------------------------------
//Header File:
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // Von der IDE verwaltete Komponenten
    TRvProject *RvProject1;
    TRvSystem *RvSystem1;
    TButton *Button1;
    void __fastcall Button1Click(TObject *Sender);
    void __fastcall RvSystem1BeforePrint(TObject *Sender);
    void __fastcall RvSystem1Print(TObject *Sender);
    void __fastcall RvSystem1AfterPrint(TObject *Sender);
private:    // Anwender-Deklarationen
public:        // Anwender-Deklarationen
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

//--------------------------------------------------------------------------
// CPP - File
//--------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  RvProject1->Open();
  RvProject1->Execute();
  RvProject1->Close();
}
//---------------------------------------------------------------------------

// THIS IS FIRED
void __fastcall TForm1::RvSystem1BeforePrint(TObject *Sender)
{

MessageDlg("Hi BeforePrint", mtInformation, TMsgDlgButtons() << mbOK,0);
}
//---------------------------------------------------------------------------

// THIS IS NOT FIRED
void __fastcall TForm1::RvSystem1Print(TObject *Sender)
{
MessageDlg("Hi On Print", mtInformation, TMsgDlgButtons() << mbOK, 0);

}
//---------------------------------------------------------------------------
// THIS IS FIRED
void __fastcall TForm1::RvSystem1AfterPrint(TObject *Sender)
{
    MessageDlg("Hi AfterPrint", mtInformation, TMsgDlgButtons() << mbOK, 0);
}
//---------------------------------------------------------------------------

-**xXx**-

Gibts denn eigentlich was zu Drucken? Ich glaube, wenn du nichts zum drucken hast, spuckt der Report nichtmal ne leere Seite aus. Also gibts auch kein OnPrint...

mfg
xXx

Hans-Martin

Na klar gibt es was zum drucken.... und es kommt sogar beim Drucker raus!!!