Re: need some help to Accelerators.xcu

2015-06-24 Thread Amenel VOGLOZIN
17 juin 2015 20h36 Objet : Re: need some help to Accelerators.xcu just found, that there is a service com.sun.star.ui.GlobalAcceleratorConfiguration maybe this will work: Sub Main     oGlobalAccelCfg = createUnoService(com.sun.star.ui.GlobalAcceleratorConfiguration)     Dim aKeyEvent as new

Re: need some help to Accelerators.xcu

2015-06-17 Thread Oliver Brinzing
just found, that there is a service com.sun.star.ui.GlobalAcceleratorConfiguration maybe this will work: Sub Main oGlobalAccelCfg = createUnoService(com.sun.star.ui.GlobalAcceleratorConfiguration) Dim aKeyEvent as new com.sun.star.awt.KeyEvent aKeyEvent.KeyCode =