von skraszewski » So, 25.09.2005 14:47
Hallo an Alle,
da ich ziemlich viele Dokumente erstelle, wo in einem Text englische, deutsche und polnische Wörter vorkommen, wollte ich die einstellung des Attributs Sprache automatisieren. Ich habe ein Makro aufgezeichnet, mit dem Dem Zeichen die Eigenschaft Deuitsch zugeordnet werden sollte.:
**************
sub Deutsch
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Language"
args1(0).Value = 1031
dispatcher.executeDispatch(document, ".uno:Language", "", 0, args1())
end sub
**************
Eine böse Überraschung ist: es läuft nicht. Das Dialogfenster Zeichen wird eingeblendet und alles bleibt stehen. Wo liegt denn die Ursache des Fehlers?
Grüße aus Polen
skraszewski
Hallo an Alle,
da ich ziemlich viele Dokumente erstelle, wo in einem Text englische, deutsche und polnische Wörter vorkommen, wollte ich die einstellung des Attributs Sprache automatisieren. Ich habe ein Makro aufgezeichnet, mit dem Dem Zeichen die Eigenschaft Deuitsch zugeordnet werden sollte.:
**************
sub Deutsch
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Language"
args1(0).Value = 1031
dispatcher.executeDispatch(document, ".uno:Language", "", 0, args1())
end sub
**************
Eine böse Überraschung ist: es läuft nicht. Das Dialogfenster Zeichen wird eingeblendet und alles bleibt stehen. Wo liegt denn die Ursache des Fehlers?
Grüße aus Polen
skraszewski