I am running OOo 3.0 ... for the following code, the annotation note
gets created on the document with the correct date, but the Content of
the annotation is always blank :
(Is this a bug ?)
<code>
oDoc = ThisComponent
oTextCursor = oDoc.getCurrentController().getViewCursor()
oTextCursor.goToEnd(false)
Dim oDate As New com.sun.star.util.DateTime
With oDate
.Day = Day(Now)
.Month = Month(Now)
.Year = 2007
End With
oTextAnnotation =
oDoc.createInstance("com.sun.star.text.TextField.Annotation")
oTextAnnotation.Author= "AH"
oTextAnnotation.Content = "Hello !"
oTextAnnotation.DateTimeValue = oDate
oDoc.Text.insertTextContent( oTextCursor, oTextAnnotation, True)
</code>
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
