function GetFocusableAnnotationSubtypes: TPdfAnnotationSubtypes;
| Result | TPdfAnnotationSubtypes. מערך דינמי של תתי-הסוגים הניתנים למיקוד; ריק כאשר הרשימה נוקתה. |
קוראת בחזרה את רשימת המיקוד שסביבת מילוי הטפסים מתחזקת — הרשימה שקובעת אילו הערות יכולות לקבל מיקוד מקלדת, ולכן דרך אילו רשומות עוברות קריאות ניווט כמו FocusFormField
הקריאה מבצעת שתי הקפות מקוריות: קודם את הספירה (FPDFAnnot_GetFocusableSubtypesCount) ואז את הערכים (FPDFAnnot_GetFocusableSubtypes), כל אחד מפוענח בחזרה ל-TPdfAnnotationSubtype. כאשר הספירה היא אפס, התוצאה היא מערך ריק ולא שגיאה
הקריאה דורשת מסמך טעון וסביבת מילוי טפסים מאותחלת; כאשר הטפסים אינם מאותחלים היא מעלה EPdfError עם ההודעה Form fill environment is not initialized. שאילתה מקורית שנכשלת מעלה Cannot retrieve focusable annotation subtypes. שנו את הרשימה באמצעות SetFocusableAnnotationSubtypes
var
Subtypes: TPdfAnnotationSubtypes;
Subtype: TPdfAnnotationSubtype;
begin
Subtypes := Pdf1.GetFocusableAnnotationSubtypes;
for Subtype in Subtypes do
Memo1.Lines.Add(GetEnumName(TypeInfo(TPdfAnnotationSubtype),
Ord(Subtype)));
end;