Seite 1 von 1

aktuelle cursorposition im writer

Verfasst: Mi, 11.02.2009 18:26
von loewe66
Hallo zusammen,
ich versuche gerade einen Text wie folgt an die aktuelle cursorpostion in einem writer-dokument zu bringen.

odoc=thiscomponent
otext=odoc.text
ocursor=otext.createTextcursor() '
'myViewCursor=myDoc.GetCurrentController.ViewCursor
otext.insertString(ocursor,"Mein Text" ,false)

aber leider schreibt er es immer genau an den dokumentenanfang. wie gehts denn richtig??
Danke für die Hilfe
Gruß Marc

Re: aktuelle cursorposition im writer

Verfasst: Mi, 11.02.2009 21:31
von turtle47
Hallo Marc,

Code: Alles auswählen

Sub Write_Cursor_Position
Dim oViewCursor as object
	odoc=thiscomponent
	oViewCursor= thiscomponent.GetCurrentController.ViewCursor
	otext=odoc.text
	otext.insertString(oViewCursor, "My New Text",false)
end sub
sollte es tun.

Viel Erfolg.

Jürgen

Re: aktuelle cursorposition im writer

Verfasst: Do, 12.02.2009 09:04
von loewe66
Hallo Jürgen,
super danke das hilft.
LG Marc