Я пытаюсь извлечь аннотации из PDF-файлов. В настоящее время я могу читать все аннотации, используя этот код.
Dim reader As PdfReader = New PdfReader("MyPDF.pdf")
For i As Integer = 1 To reader.NumberOfPages
Dim array As PdfArray = reader.GetPageN(i).GetAsArray(PdfName.ANNOTS)
If array Is Nothing Then Continue For
For j As Integer = 0 To array.Size - 1
Dim annot As PdfDictionary = array.GetAsDict(j)
Dim name As PdfString = annot.GetAsString(PdfName.T)
Dim text As PdfString = annot.GetAsString(PdfName.CONTENTS)
Next
Next
Теперь я хотел бы проверить тип аннотации, чтобы я мог зачеркнуть не столь важные для меня, например. формы;
- Sticky Note
- выделение текста
- Подчеркивание текста
- Зачеркнутый текст
- Line
- Arrow
- ....
Но я не могу найти образцы по этому вопросу. Я попытался найти документацию, но снова не смог понять.
Как мне поступить?