From 78a3277b28976efffea202c7a9dedc144a702991 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Wed, 9 Sep 2009 22:55:57 +0000
Subject: [PATCH] lcl: pass THintInfo.HintData to the ActivateHint on
 TApplication.ShowHintWindow (patch by Anton Kavalenka, issue #0014549)

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

diff --git a/lcl/include/application.inc b/lcl/include/application.inc
index 570a6134ca..c0d1db1376 100644
--- a/lcl/include/application.inc
+++ b/lcl/include/application.inc
@@ -794,7 +794,7 @@ begin
     //DebugLn(['TApplication.ShowHintWindow FHintWindow.Color=',dbgs(FHintWindow.Color),' HintInfo.HintColor=',dbgs(HintInfo.HintColor)]);
 
     //debugln('TApplication.ShowHintWindow B HintWinRect=',dbgs(HintWinRect),' HintStr="',DbgStr(HintInfo.HintStr),'"');
-    FHintWindow.ActivateHint(HintWinRect,HintInfo.HintStr);
+    FHintWindow.ActivateHintData(HintWinRect, HintInfo.HintStr, HintInfo.HintData);
     FHintRect := HintInfo.CursorRect;
     // start hide timer
     StartHintTimer(HintInfo.HideTimeout,ahttHideHint);