FontIsEmbedded - TPdf - PDFium Delphi Component

Component: TPdf · Unit: PDFium

Anger om teckensnittet som används av ett sidobjekt är inbäddat i PDF:en (True) eller endast refererat och löses upp vid visningstillfället från operativsystemet (False)

Syntax

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

Description

FontIsEmbedded rapporterar om teckensnittet som refereras av textsidobjektet vid det givna indexet har sitt faktiska glyfprogram inuti PDF-filen. Ett inbäddat teckensnitt följer med dokumentet och renderas identiskt på alla plattformar; ett teckensnitt som inte är inbäddat (endast refererat) förlitar sig på att visningsprogrammet hittar ett lokalt installerat teckensnitt med samma namn och kan ersättas vid visning

Indexeraren är det nollbaserade sidobjektindexet (0..ObjectCount - 1). Objekt som inte är text returnerar alltid False. En sida måste vara aktiv innan egenskapen läses

Inbäddning kan vara fullständig (varje glyf från källteckensnittet finns med) eller en delmängd (endast de glyfer som faktiskt används förekommer, med ett sexbokstavsprefix tillagt till basnamnet); båda formerna räknas som inbäddade här. För PDF/A-efterlevnad måste varje teckensnitt vara inbäddat — denna egenskap är ett snabbt granskningsverktyg för det kravet

Parameters

Index

Nollbaserat sidobjektindex i intervallet 0..ObjectCount - 1

Remarks

De 14 standardteckensnitten i PDF av typen Type1 (Helvetica, Times-Roman osv.) är typiskt sett inte inbäddade och förväntas lösas upp av visningsprogrammet
Ett True-värde säger inte om inbäddningen är fullständig eller en delmängd — granska FontBaseName efter ett ABCDEF+-prefix för att upptäcka en delmängd
Kombinera med FontData när du behöver råbytesen — FontData returnerar endast data när teckensnittet är inbäddat
För objekt som inte är text är egenskapen meningslös och returnerar False
Användbar vid kontroll av PDF/A-efterlevnad eller vid beräkning av hur portabelt ett dokument är mellan system

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 Egenskap