Hi Flávio, on Sun, 30 Mar 2014 14:50:08 -0300, you wrote:
>There's a bug in application.inc, line 816. OnShowHint only executes >if there are hint handlers registered: > >(...) > i:=FApplicationHandlers[ahtShowHint].Count; > if CanShow and (i>0) then begin > if Assigned(FOnShowHint) then > FOnShowHint(HintInfo.HintStr, CanShow, HintInfo); >(...) I see. After changing it to | i:=FApplicationHandlers[ahtShowHint].Count; | if CanShow then begin | if Assigned(FOnShowHint) then | FOnShowHint(HintInfo.HintStr, CanShow, HintInfo); | if i>0 then | while FApplicationHandlers[ahtShowHint].NextDownIndex(i) do | TShowHintEvent(FApplicationHandlers[ahtShowHint][i])(HintInfo.HintStr, CanShow, HintInfo); | end; I get the expected results. Many thanks to you and Graeme. Great service! Frank -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
