Didier Dorange-Pattoret a écrit :
Bonjour à tous,
Je vous soumets un problème /*important*/ que je rencontre avec dmaths
pour l'insertion des formules.
Le code ci-dessous a été obtenu grâce à l'enregistreur de macro.
Voici ce qui se passe:
1) j'écris le code source d'une formule dans un document swriter par
exemple: widevec AB
2) je sélectionne le code
3) je lance la macro Writeformula: la formule est insérée.
Je recommence avec une autre formule par exemple : f(x)=1 over x
cela ne pose pas de problème.
Par contre si j'édite la première formule avant d'écrire la seconde
alors j'ai un plantage à la ligne:
document = ThisComponent.CurrentController.Frame
Avez vous une idée pour corriger le problème ?
Bonjour,
Je me réponds à moi-même:
Cette macro semble corriger le pb:
sub Writeformula
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
oDesktop = createUnoService("com.sun.star.frame.Desktop")
document= oDesktop.getCurrentComponent().getCurrentController()
rem au lieu de: document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:InsertObjectStarMath", "", 0,
Array())
dispatcher.executeDispatch(document, ".uno:Escape", "", 0, Array())
end sub
--
Didier Dorange-Pattoret
http://www.dmaths.org
http://sesamath.net
Liste de diffusion de dmaths: user...@dmaths.org
Ses archives: http://listes.tuxfamily.org/?A=LIST&L=users_dmaths.com
Les Forums: http://www.dmaths.org/modules.php?name=Forums
Mailing List in english:
http://www.dmaths.org/modules.php?name=Content&pa=showpage&pid=9
Le livre de référence sur OpenOffice.org par Sophie Gautier pour 23,75 euros:
http://www.amazon.fr/exec/obidos/ASIN/221211348X/dmaths-21
2 messages in org.openoffice.fr.progRe: [prog] Bug avec les formules
