[ThomasJaeger]

I'm using Delphi 7 on XP with 10.01 and now upgraded to 11.02 and TsAlphaHints is no longer working properly. I have tested the same EXE on Windows 7 and Windows 10. All show the hint at 0,0.

It always displays the hints at position 0,0 even though I pass a TPoint of the Mouse.CursorPos like so:

Code:

var
point: TPoint;
begin
point := Mouse.CursorPos;
sAlphaHints1.ShowHint(point, 'Some hint', 30000);
end;

This used to work in version 10.01 and it is now broken in 11.02. Please fix as soon as possible, please.

Thank you,

Thomas

[Support]

Hello Thomas

I have tried your code, but it works as expected.

Can you make and upload the demo with this problem, please?

[ThomasJaeger]

So, I tried to create a sample app with the issue with 11.02 but it works. However, this is what I tried and I know it must be somewhere between version 10.01 and 10.29 and 11.02.

I reverted from 11.02 to 10.29 and experienced the same issue in my app where the AlphaHints show up in the upper left corner. Ok, so then I went back to my last known working version which was 10.01. This is working fine. In version 10.01, all my AlphaHints are working based on Mouse.CursorPos position. So, obviously, the changes made between 10.01 and 10.29 is affecting this behavior. Please keep in mind I made no code changes in my app. All I did was reverting back to 10.01.

I wish you could reproduce this error. I'm not sure what to do now since I can't upgrade to any new versions or try to recreate my entire main form from scratch and see if that helps.

[Support]

So, this issue can be repeated in your application only?

[ThomasJaeger]

Correct.

[Support]

Do you uses any events in the TsAlphaHints component?

Or maybe you have defined some options which I should know?

[Author]

Posts