ich arbeite momentan an einer Textvorlage inklusive Makros für das "10-Finger-Blindschreiben" an Schulen.
. Ich möchte, dass unabhängig von den voreingestellten Optionen von OpenWriter die Makros für das Blindschreiben unerwünschte Einstellungen ausschalten. Das meiste funktioniert schon ausgezeichnet (Anzahl der Tastenanschläge, Ausschalten der automat. Rechtschreibung, Ausschalten der automat. Wortkorrektur , Ausschalten des Zwischenspeichers ....)
Nur bei einer Einstellung muss ich passen, nämlich bei der automatischen Wortergänzung. Mittels des Makrorecorders komme ich erst nicht weiter. Mehr als
Code: Alles auswählen
sub Main
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 ----------------------------------------------------------------------
rem dispatcher.executeDispatch(document, ".uno:AutoCorrectDlg", "", 0, Array())
end sub
Wäre dankbar, wenn jemand eine Idee hätte.
Vielen Dank
Reiner Schmid