From 2bac2f4e5a27d5918001e2e139f334f9ac4d94a3 Mon Sep 17 00:00:00 2001
From: ondrej <ondrej@lazarus-ide.org>
Date: Mon, 27 Feb 2017 14:27:52 +0000
Subject: [PATCH] LCL: hint window: use Font instead of Canvas.Font. Issue
 #31443

git-svn-id: trunk@54293 -
---
 lcl/include/hintwindow.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/include/hintwindow.inc b/lcl/include/hintwindow.inc
index 6f7d37779b..1f43a48be7 100644
--- a/lcl/include/hintwindow.inc
+++ b/lcl/include/hintwindow.inc
@@ -27,7 +27,7 @@ begin
   fCompStyle := csHintWindow;
   Parent := nil;
   Color := clInfoBk;
-  Canvas.Font := Screen.HintFont;
+  Font := Screen.HintFont;
   Canvas.Brush.Style := bsClear;
   FAlignment := taLeftJustify;
   BorderStyle := bsNone;