From 92f1f8c86572ae9e5176a5333e4f1e1623836044 Mon Sep 17 00:00:00 2001 From: ask Date: Sun, 10 Jul 2011 09:55:46 +0000 Subject: [PATCH] TAChart: Add Font.Style support to TBGRABitmapDrawer git-svn-id: trunk@31652 - --- components/tachart/tadrawerbgra.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/components/tachart/tadrawerbgra.pas b/components/tachart/tadrawerbgra.pas index cef9a7cf81..16e862fc2e 100644 --- a/components/tachart/tadrawerbgra.pas +++ b/components/tachart/tadrawerbgra.pas @@ -215,7 +215,8 @@ begin Canvas.Font.Height := AFont.Size * 96 div 72; Canvas.Font.Orientation := FGetFontOrientationFunc(AFont); Canvas.Font.BGRAColor := FPColorToBGRA(AFont.FPColor); - // TODO: FontStyle + if AFont is TFont then + Canvas.Font.Style := (AFont as TFont).Style; end; procedure TBGRABitmapDrawer.SetPen(APen: TFPCustomPen);