sub test
dim ovc, ov
ovc= thisComponent.CurrentController.getViewCursor()
ov = ovc.getPosition()                      'Cursor pos'n from top left of text
print ov.x
end sub