Delphi 的绘图功能[10] - TFONT 类

Delphi 的绘图功能[10] - TFONT 类

;
DEFAULT_CHARSET     = ;
SYMBOL_CHARSET      = ;
SHIFTJIS_CHARSET    = ;
HANGEUL_CHARSET     = ;
GB2312_CHARSET      = ;
CHINESEBIG5_CHARSET = ;
OEM_CHARSET         = ;
JOHAB_CHARSET       = ;
HEBREW_CHARSET      = ;
ARABIC_CHARSET      = ;
GREEK_CHARSET       = ;
TURKISH_CHARSET     = ;
VIETNAMESE_CHARSET  = ;
THAI_CHARSET        = ;
EASTEUROPE_CHARSET  = ;
RUSSIAN_CHARSET     = ;

;

Canvas.Font.Orientation := ;
  Canvas.TextOut(, ClientHeight-, S);
end;