function GetFocusableAnnotationSubtypes: TPdfAnnotationSubtypes;
| Result | TPdfAnnotationSubtypes. Динамичен масив от фокусируемите подтипове; празен, когато списъкът е бил изчистен. |
Прочита обратно списъка с фокус, поддържан от средата за попълване на формуляри — списъка, който определя кои анотации могат да получат клавиатурен фокус и следователно през какво преминават навигационните извиквания като FocusFormField
Прочитането прави два native обрата: първо за броя (FPDFAnnot_GetFocusableSubtypesCount), после за стойностите (FPDFAnnot_GetFocusableSubtypes), като всяка се декодира обратно в TPdfAnnotationSubtype. Когато броят е нула, резултатът е празен масив, а не грешка
Извикването изисква зареден документ и инициализирана среда за попълване на формуляри; когато формулярите не са инициализирани, се вдига EPdfError със съобщение Form fill environment is not initialized. Неуспешно native запитване вдига 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;