FontIsEmbedded - TPdf

Ten wpis API zachowuje identyfikatory, sygnatury, bloki kodu i terminy PDF w oryginalnej postaci.

Komponent: TPdf · Moduł: PDFium

Wskazuje, czy font używany przez obiekt strony jest osadzony w PDF (True), czy tylko przywołany i rozwiązywany w czasie wyświetlania przez system operacyjny (False)

Składnia

property FontIsEmbedded[Index: Integer]: Boolean; // read only

Opis

FontIsEmbedded raportuje, czy font wskazywany przez obiekt tekstowy strony pod podanym indeksem zawiera swój rzeczywisty program glifów wewnątrz pliku PDF. Osadzony font podróżuje z dokumentem i renderuje się identycznie na każdej platformie, a font nieosadzony (tylko przywołany) polega na tym, że przeglądarka znajdzie lokalnie zainstalowany font o tej samej nazwie, więc może zostać zastąpiony przy wyświetlaniu

Indeksator jest 0-based indeksem obiektu strony (0..ObjectCount - 1). Obiekty nietekstowe zawsze zwracają False. Strona musi być aktywna przed odczytem właściwości

Osadzenie może być pełne (obecny jest każdy glif z fontu źródłowego) albo typu subset (pojawiają się tylko faktycznie użyte glify, z sześcioliterowym prefiksem dodanym do nazwy bazowej); tutaj oba warianty liczą się jako osadzone. W celu zgodności z PDF/A każdy font musi być osadzony — ta właściwość jest szybkim narzędziem audytowym do tego wymagania

Parametry

Index

0-based page-object index in the range 0..ObjectCount - 1.

Uwagi

14 standardowych fontów PDF Type1 (Helvetica, Times-Roman itd.) zwykle nie jest osadzonych i oczekuje się, że zostaną rozpoznane przez przeglądarkę
Wartość True nie mówi, czy osadzenie jest pełne, czy typu subset — sprawdź FontBaseName pod kątem prefiksu ABCDEF+, aby wykryć subset
Połącz to z FontData, gdy potrzebujesz surowych bajtów — FontData zwraca dane tylko wtedy, gdy font jest osadzony
Dla obiektów nietekstowych właściwość nie ma znaczenia i zwraca False
Przydatne przy sprawdzaniu zgodności z PDF/A albo przy obliczaniu, jak przenośny jest dokument między systemami

Przykład

var
  I, EmbeddedCount, TextCount: Integer;
begin
  Pdf1.PageNumber := 1;
  EmbeddedCount := 0;
  TextCount := 0;
  for I := 0 to Pdf1.ObjectCount - 1 do
  if Pdf1.ObjectType[I] = otText then
  begin
    Inc(TextCount);
    if Pdf1.FontIsEmbedded[I] then Inc(EmbeddedCount);
  end;
  ShowMessage(Format('%d of %d text objects use embedded fonts',
    [EmbeddedCount, TextCount]));
end;

Zobacz też

FontData, FontFamilyName, FontBaseName, FontHandle, ObjectType

FontIsEmbedded Właściwość