property Annotation[Index: Integer]: TPdfAnnotation; // للقراءة والكتابة
خاصية قراءة/كتابة مفهرسة تعيد أو تحدِّث سجل التعليق عند الفهرس المعطى في الصفحة الحالية
تتطلب Active أن يكون True. تكون النتيجة غير معرَّفة عندما يكون الفهرس خارج النطاق الصالح؛ مرِّر قيمًا في 0 .. AnnotationCount - 1 (أو استخدم Length المصفوفة للمتغيرات غير المعدودة).
السجل المُعاد هو لقطة للقيمة وقت الاستدعاء؛ ولا تعدِّل التعديلات اللاحقة على المستند السجلات المُعادة سابقًا.
يحتوي AttachmentPointSets كل رباعي تستخدمه تعليقات التمييز والتسطير والتشويش والشطب متعددة الأسطر؛ ويبقى AttachmentPoints اسمًا بديلًا للتوافق مع المجموعة الأولى
تكتب إعادة تعيين السجل القيم المغيَّرة إلى التعليق؛ وعيِّن حارس Has* عندما يجب مسح سلسلة موجودة صراحةً إلى قيمة فارغة
| Index | فهرس صفري الأساس في النطاق 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;