property AnnotationCount: Integer; // read only
AnnotationCount returnerar längden på den aktuella sidans
/Annots-array (PDF 1.7 spec, avsnitt 12.5). Alla annoteringsundertyper
räknas — textnotiser, markeringar, understrykningar, fri text, bläck, stämplar,
polygon- och polylinjeformer, länkannoteringar, popup-dialoger och
formulärwidget-annoteringar. Kombinera värdena från varje sida för att få
dokumentets totala antal annoteringar
Egenskapen kräver att Active är True och läser från
sidan som anges av PageNumber. När sidan saknar annoteringar eller
dokumentet inte är inläst är värdet 0. Använd Annotation[Index]
med index från 0 till AnnotationCount - 1 för att hämta en
TPdfAnnotation-post som beskriver subtyp, begränsningsrektangel, färg,
flaggbitmask och innehållstext för varje post
Att iterera annoteringar är O(n), men varje Annotation[Index]-anrop
öppnar ett nytt PDFium-handtag och avkodar Unicode-innehåll på begäran; cacha resultatet
om du behöver det flera gånger. Ändringar av en sidas annoteringar (infogningar,
borttagningar) ogiltigförklarar index — starta om loopen eller läs AnnotationCount
igen efter ändringen
FormFieldCount om du enbart vill ha fältwidgetsLinkAnnotationCount[PageNumber],
som filtrerar till subtypen /Link direkt över valfri sida
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;