Top > OOoBasic > Writer > Comments

コメント Edit

コメントはテキストフィールドの一種です。com.sun.star.text.textfield.Annotation サービスを利用します。

コメントの挿入 Edit

一般的なフィールドと同じように挿入します。

  0
  1
  2
  3
  4
  5
  6
  7
  8
Sub InsertComment
  oDoc = ThisComponent
  oText = oDoc.getText()
 
  ' new comment field
  oComment = oDoc.createInstance("com.sun.star.text.textfield.Annotation")
  oText.insertTextContent(oText.getStart(), oComment, False)
  oComment.Content = "Comment"
End Sub

コメントに書式設定が必要であれば TextRange プロパティから行います。

ドキュメント中のコメントの取り扱い Edit

ドキュメントにあるコメント全てにアクセスします。テキストフィールドがコメントかどうかを判定する必要があります。

  0
  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
sub GetAllComments
  oDoc = ThisComponent
  oFields = oDoc.getTextFields()
  
  oFieldEnume = oFields.createEnumeration()
  While oFieldEnume.hasMoreElements()
    oField = oFieldEnume.nextElement()
    If oField.supportsService("com.sun.star.text.textfield.Annotation") Then
      
      ' do something
      msgbox oField.Content
    End If
  WEnd
end sub

プロパティ Edit

プロパティ説明
AnchorTypecss.text.TextContentAnchorTypeアンカーの種類
AnchorTypes[]css.text.TextContentAnchorTypeアンカーの種類複合時
Contentstringコメント文字列
TextRangecss.uno.XInterfaceコメントのテキスト
Authorstringコメントの著者
Datecss.util.Dateコメントの日付
DateTimeValuecss.util.DateTimeコメントの日付と時間
IsFieldDisplayedboolean
IsFieldUsedboolean
TextWrap.text.WrapTextModeテキスト回り込み

Reload   New Lower page making Edit Freeze Diff Upload Copy Rename   Front page List of pages Search Recent changes Backup   Help   RSS of recent changes