Hi all,
Im playing with the code below.
In writer, run the macro StartRec, do something in the document and run
StopRec.
You will notice that dispatches like ".uno:GoUp" or ".uno:SwBackspace" are
properly recorded, but dispatches like ".uno:InsertText" or ".uno:InsertPara"
do not.
Am I missing something?
thank you for any help
Paolo
--------------8<--------------
REM ***** BASIC *****
sub StartRec
oFrame = ThisComponent.CurrentController.Frame
oSupplier = CreateUnoService("com.sun.star.frame.DispatchRecorderSupplier")
oRecorder = CreateUnoService("com.sun.star.frame.DispatchRecorder")
oSupplier.DispatchRecorder = oRecorder
oFrame.DispatchRecorderSupplier = oSupplier
oRecorder.startRecording(oFrame)
end sub
sub StopRec
oFrame = ThisComponent.CurrentController.Frame
oSupplier = oFrame.DispatchRecorderSupplier
oRecorder = oSupplier.DispatchRecorder
Msgbox oRecorder.getRecordedMacro
oRecorder.endRecording()
oFrame.DispatchRecorderSupplier = Nothing
end sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
