property AnnotationCount: Integer; // read only
AnnotationCount geeft de lengte terug van de /Annots-array van de huidige pagina (PDF 1.7-spec sectie 12.5). Alle annotatiesubtypen worden meegeteld — tekstnotities, markeringen, onderstrepingen, vrije tekst, inkt, stempels, polygoon- en polylijnvormen, linkannotaties, pop-upvensters en formulierveldannotaties. Tel de waarden van elke pagina op om het totale aantal annotaties voor het document te krijgen
De eigenschap vereist dat Active True is en leest van de pagina die wordt aangeduid door PageNumber. Wanneer de pagina geen annotaties heeft of het document niet is geladen, is de waarde 0. Gebruik Annotation[Index] met indices van 0 tot AnnotationCount - 1 om een TPdfAnnotation-record op te halen dat het subtype, de begrenzingsrechthoek, de kleur, de vlagbitmasker en de inhoudstekst van elke vermelding beschrijft
Het itereren over annotaties is O(n) maar elke Annotation[Index]-aanroep opent een nieuwe PDFium-handle en decodeert Unicode-inhoud op verzoek; cache het resultaat als u het meerdere keren nodig hebt. Wijzigen van de annotaties van een pagina (toevoegingen, verwijderingen) maakt indices ongeldig — start de lus opnieuw of lees AnnotationCount na de wijziging opnieuw uit
FormFieldCount als u alleen veldwidgets wiltLinkAnnotationCount[PageNumber], dat direct filtert op subtype /Link over elke pagina
var I: Integer;
var A: TPdfAnnotation;
for I := 0 to Pdf1.AnnotationCount - 1 do
begin
A := Pdf1.Annotation[I];
Memo1.Lines.Add(Format('%d: subtype=%d text=%s',
[I, Ord(A.Subtype), A.ContentsText]));
end;