Setzt einen nichtsichtbaren Cursor auf den sichtbaren Cursor.

Sub SetViewCursor ( oDoc as object, oCursor as object)

  oViewCursor = oDoc.CurrentController.getviewCursor()

  oViewCursor.gotorange(oCursor,false)

end Sub