OpenOffice.info

Global oListener    As Object 

Sub Listener_registrieren()
oListener = CreateUnoListener( "Ereignis_", "com.sun.star.view.XPrintJobListener" ) 
ThisComponent.addPrintJobListener(oListener) 
End Sub 

Sub Ereignis_printJobEvent(oEvent)
Msgbox "Druck-Ereignis"
End Sub

Benutze statt der EReigniszuweisung über die GUI den entsprechenden Listener:

http://www.openoffice.org/api/docs/common/ref/com/sun/star/view/XPrintJobListener.html

Im Groben also ungefähr:

[code]Global oListener As Object

Sub Listener_registrieren()
oListener = CreateUnoListener( "Ereignis_", "com.sun.star.view.XPrintJobListener" )
ThisComponent.addPrintJobListener(oListener)
End Sub

Sub Ereignis_printJobEvent(oEvent)
Msgbox "Druck-Ereignis"
End Sub[/code]


Gruß
Stephan