Voici quelques liens concernant le framework Dispatch :

http://api.openoffice.org/docs/common/ref/com/sun/star/frame/DispatchHelper.html
http://api.openoffice.org/docs/DevelopersGuide/OfficeDev/OfficeDev.xhtml#1_1_6_Using_the_Dispatch_Framework
http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/OfficeDev/Dispatch_Framework
http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/OfficeDev/Using_the_Dispatch_Framework
http://api.openoffice.org/files/documents/22/1344/slots.sxc

Mais le plus simple reste d'observer le code généré par l'enregistreur de 
macros.

http://wiki.services.openoffice.org/wiki/The_OpenOffice.org_recorder_and_UNO_dispatch_calls

Cordialement,
T. Vataire


----- Mail Original -----
De: "Didier Dorange-Pattoret" <ddora...@dmaths.org>
À: prog@fr.openoffice.org
Envoyé: Dimanche 16 Mai 2010 22:40:06
Objet: Re: [prog] Insérer un document writer dans Impress

Bonsoir,

Merci Thibault pour cette aide précieuse.

J'ai intégré la macro dans Dmaths. Les utilisateurs pourrons accéder aux
fonctionnalités de Dmaths depuis Impress ...


Thibault Vataire a écrit :
> Bonjour,
>
> Le plus simple est d'utiliser le service com.sun.star.frame.DispatchHelper 
> pour executer la commande du menu Edition>Objet>Editer :
>   
Où peut-on trouver une documentation pour ce service ?
> sub insereTexte
>
>       dim doc as object
>       dim obj as object
>       dim aPos as variant
>       dim aSize as variant
>       dim controller as object
>       dim dispatcher as object
>       dim args1(0) as new com.sun.star.beans.PropertyValue
>       
>       doc = thisComponent
>       obj = doc.CreateInstance("com.sun.star.drawing.OLE2Shape")
>       ...
>       controller = doc.currentController
>       if (not isNull(controller)) then
>               if (controller.select(obj)) then
>                       dispatcher = 
> createUnoService("com.sun.star.frame.DispatchHelper")
>                       args1(0).Name = "VerbID"
>                       args1(0).Value = 65535
>                       dispatcher.executeDispatch(controller.frame, 
> ".uno:ObjectMenue", "", 0, args1())
>               end if
>       end if
>
> end sub
>
>   

-- 
Didier Dorange-Pattoret

http://www.dmaths.org
http://sesamath.net

Soutenez le projet Dmaths : rejoignez le club ou faites adhérer votre 
établissement !
http://www.dmaths.org/documentation/doku.php?id=presentation:club



---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org


---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org

Répondre à