property Annotation[Index: Integer]: TPdfAnnotation; // read only
Индексированное свойство только для чтения, возвращающее запись аннотации с заданным индексом на текущей странице (тип, прямоугольник, цвет, содержимое и так далее)
Требует, чтобы Active было равно True. Результат не определён, если индекс выходит за допустимый диапазон; передавайте значения в пределах 0 .. AnnotationCount - 1 или используйте Length массива для вариантов без счётчика
Возвращаемая запись является снимком значения на момент вызова; последующие изменения документа не меняют уже возвращённые записи
| Index | Zero-based index in the range 0 .. AnnotationCount - 1. |
var
I: Integer;
begin
if not Pdf1.Active then Exit;
for I := 0 to Pdf1.AnnotationCount - 1 do
begin
// inspect Pdf1.Annotation[I]
Memo1.Lines.Add(IntToStr(I));
end;
end;