我正在使用Application.ActivateHint(p)
, wherep: TPoint
来显示指定位置的提示。但它总是显示在 Delphi XE2 上的实际鼠标坐标上。
请看堆栈:
Main.ApplicationEventsShowHint('Hint String Here...',True,$18FB14)
:5049c644 TCustomApplicationEvents.DoShowHint + $20
:5049d043 TMultiCaster.DoShowHint + $4B
:50454a6b TApplication.ActivateHint + $213
RxDBCtrl.TRxDBGrid.MouseMove([],934,45)
在RxDBCtrl.TRxDBGrid.MouseMove
我调用TApplication.ActivateHint
正确的屏幕坐标作为参数。但是 onMain.ApplicationEventsShowHint(var HintStr: string; var CanShow: Boolean; var HintInfo: THintInfo)
的值HintInfo.HintPos
与实际鼠标坐标相同。作为参数传递的值将TApplication.ActivateHint
丢失。
为什么会发生这种情况?如何在 Delphi XE2 上显示所需坐标的提示?
非常感谢您的帮助!