THPDFPage.SetFont-metode

procedure SetFont ( FontName: AnsiString; FontStyle: TFontStyles; ASize: Single; FontCharset: TFontCharset = DEFAULT_CHARSET; IsVertiacal: Boolean);

TFontStyles Definition

Determines whether the font is normal, italic, underlined, bold, and so on

type

  TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);

  TFontStyles = set of TFontStyle;

Beskrivelse:
Bruk Style til å legge til spesielle egenskaper for tegn som bruker fonten. Style er et sett som inneholder null eller flere verdier fra følgende:

Verdi	Beskrivelse

fsBold	Fonten er fet
fsItalic	Fonten er kursiv
fsUnderline	Fonten er understreket
fsStrikeOut	Fonten vises med en horisontal linje gjennom seg

TFontCharset-definisjon

TFontCharset representerer tegnsettet til en font

type TFontCharSet = 0..255;

Beskrivelse:
Hver Windows-font støtter ett eller flere tegnsett, som angir hvilke tegn som kan skrives med fonten. For eksempel bruker de fleste fonter som kan representere japanske tegn et bestemt multibyte-tegnsett
Hver font støtter sitt eget unike sett med tegnsett. Sjekk med fontleverandøren for å finne ut hvilke tegnsett som støttes
Følgende tabell viser de forhåndsdefinerte konstantene som er tilgjengelige for standard tegnsett:

Konstant Verdi Beskrivelse

ANSI_CHARSET 0 ANSI-tegn
DEFAULT_CHARSET 1 Fonten velges utelukkende basert på navn og størrelse
SYMBOL_CHARSET 2 Standard symbolsett
MAC_CHARSET 77 Macintosh-tegn. Ikke tilgjengelig på NT 3.51
SHIFTJIS_CHARSET 128 Japanske shift-JIS-tegn
HANGEUL_CHARSET 129 Koreanske tegn (Wansung)
JOHAB_CHARSET 130 Koreanske tegn (Johab). Ikke tilgjengelig på NT 3.51
GB2312_CHARSET 134 Forenklede kinesiske tegn (fastlands-Kina)
CHINESEBIG5_CHARSET 136 Tradisjonelle kinesiske tegn (Taiwan)
GREEK_CHARSET 161 Greske tegn. Ikke tilgjengelig på NT 3.51
TURKISH_CHARSET 162 Tyrkiske tegn. Ikke tilgjengelig på NT 3.51
VIETNAMESE_CHARSET 163 Vietnamesiske tegn. Ikke tilgjengelig på NT 3.51
HEBREW_CHARSET 177 Hebraiske tegn. Ikke tilgjengelig på NT 3.51
ARABIC_CHARSET 178 Arabiske tegn. Ikke tilgjengelig på NT 3.51
BALTIC_CHARSET 186 Baltiske tegn. Ikke tilgjengelig på NT 3.51
RUSSIAN_CHARSET 204 Kyrilliske tegn. Ikke tilgjengelig på NT 3.51
THAI_CHARSET 222 Thailandske tegn. Ikke tilgjengelig på NT 3.51
EASTEUROPE_CHARSET 238 Inkluderer diakritiske tegn for østeuropeiske land. Ikke tilgjengelig på NT 3.51
OEM_CHARSET 255 Avhenger av operativsystemets kodepage

void __fastcall SetFont ( AnsiString FontName, Graphics::TFontStyles FontStyle, float ASize, Graphics::TFontCharset FontCharset; IsVertiacal: Boolean);

Metoden SetFont setter gjeldende font for tekstutdata FontStyle inneholder null eller flere stilflagg og ASize definerer skriftstørrelsen

Når du bytter mellom ulike fonter, nullstiller HotPDF den bufrede Unicode-glyfstatusen for den forrige fonten og løser glyf-ID-er og bredder for den aktive fonten. Dette er viktig for innebygde fonter som Calibri og andre TrueType Unicode-fonter

For gjentakbar utdata på tvers av visere, aktiver THotPDF.FontEmbedding og deaktiver THotPDF.StandardFontEmulation før du kaller SetFont

Når FontEmbedding er aktivert, løser HotPDF det innebygde TrueType-fontprogrammets PostScript-navn og skriver samsvarende PDF-fontnavn. Dette holder dataene i /BaseFont og /FontDescriptor konsistente selv når Windows-familienavnet som sendes til SetFont er et alias eller en erstattet font

Kodeeksempel

program TextOut;
{$APPTYPE CONSOLE}
uses
    SysUtils, Graphics, Classes, HPDFDoc;

var
    HPDF: THotPDF;

begin
    HPDF := THotPDF.Create ( nil ) ;
    try
        HPDF.AutoLaunch := true;
        HPDF.FileName := 'TextOut.pdf';
        HPDF.FontEmbedding := true;
        HPDF.StandardFontEmulation := false;
        HPDF.BeginDoc;
        HPDF.CurrentPage.SetFont('Calibri', [fsBold], 24);
        HPDF.CurrentPage.TextOut(10, 10, 0, 'Embedded font output');
        HPDF.EndDoc;
    finally
        HPDF.Free;
    end;
end.