Text - Writer
Wie kann man mit der Tastatur zwischen den Absätzen wechseln?
Es gibt keinen Tastaturbefehl um zwischen den Absätzen zu springen.
Alternativ kann man diese beiden Makros verwenden und mit einem Tastaturbefehl verknüpfen.
Mit diesen Makros springt der Cursor einen Absatz nach oben oder unten und an den Anfang
des Absatzes.
Basic
sub gotoNextParagraph
Dim myDoc as Object
Dim myViewCursor as Object
Dim myTextCursor as object
myDoc=thisComponent
myViewCursor=myDoc.GetCurrentController.ViewCursor
mytextCursor=mydoc.text.createtextcursor()
mytextCursor.gotoRange(myViewCursor,false)
mytextCursor.gotoNextParagraph(false)
mytextCursor.gotoStartOfParagraph(false)
myViewCursor.gotoRange(myTextCursor,false)
end subBasic
sub gotoPreviousParagraph
Dim myDoc as Object
Dim myViewCursor as Object
Dim myTextCursor as object
myDoc=thisComponent
myViewCursor=myDoc.GetCurrentController.ViewCursor
mytextCursor=mydoc.text.createtextcursor()
mytextCursor.gotoRange(myViewCursor,false)
mytextCursor.gotoPreviousParagraph(false)
mytextCursor.gotoStartOfParagraph(false)
myViewCursor.gotoRange(myTextCursor,false)
end sub