FontIsEmbedded - TPdf - PDFium Delphi Component

Componente: TPdf · Unità: PDFium

Indica se il font usato da un oggetto pagina è incorporato nel PDF (True) oppure è solo referenziato e risolto al momento della visualizzazione dal sistema operativo (False).

Syntax

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

Description

FontIsEmbedded riporta se il font referenziato dall'oggetto di pagina testuale all'indice dato porta con sé il suo font program di glifi dentro il file PDF. Un font incorporato viaggia con il documento e si renderizza in modo identico su ogni piattaforma; un font non incorporato (solo referenziato) si affida al viewer che deve trovare un font con lo stesso nome installato in locale, e può essere sostituito in visualizzazione

L'indicizzatore è l'indice dell'oggetto di pagina a base zero (0..ObjectCount - 1). Gli oggetti non testuali restituiscono sempre False. Una pagina deve essere attiva durante la lettura della proprietà

L'incorporamento può essere completo (presente ogni glifo del font sorgente) o subset (compaiono solo i glifi effettivamente usati, con un prefisso di sei lettere aggiunto al nome base); entrambe le forme contano come incorporate qui. Per la conformità PDF/A ogni font deve essere incorporato — questa proprietà è uno strumento di verifica rapido per quel requisito

Parameters

Index

Indice dell'oggetto di pagina a base zero nell'intervallo 0..ObjectCount - 1

Remarks

I 14 font Type1 standard del PDF (Helvetica, Times-Roman ecc.) in genere non sono incorporati e ci si aspetta che il viewer li risolva
Un ritorno True non dice se l'incorporamento è completo o subset — esamina FontBaseName cercando un prefisso ABCDEF+ per rilevare un subset
Combina con FontData quando ti servono i byte grezzi — FontData restituisce dati solo quando il font è incorporato
Per gli oggetti non testuali la proprietà è priva di significato e restituisce False
Utile quando verifichi la conformità PDF/A o calcoli quanto un documento è portabile tra sistemi

Example

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;

FontIsEmbedded Proprietà