[roshfe]

Hello:

We have come across another bug with the TsScrollbar component. The attached Demo code exhibits this bug.

When the TsScrollbar is first drawn, it will trigger an OnChange event when the mouse hovers over the control…similar to OnMouseMove. After this event has been triggered once, it will not happen again until the TsScrollBar has been redrawn.

• To test this, run the attached application and click the ShowForm button.
• Hover the mouse cursor over any Scrollbar to receive the message called by TForm2.sScrollBarChange.
• After this message has been dismissed, you can hover over the same ScrollBar without the event being triggered again.
• If you click the ShowForm button again, the Scrollbars will be removed.
• Once the scroll bars are displayed again, the OnChange event will happen upon hovering over the Scrollbar again.

Most of our applications center around the reliable operation of ScrollBars and TrackBars so getting this resolved quickly is quite important to both us and our customers.

I believe that this first happened upon installation of version 7.61.

Thanks…

Shawn

[attachment=5553:ScrollBarACBugDemo.zip]

[Support]

Hello and thanks for examples

Try attached file, both problems should be solved with this patched unit (just replace a file and rebuild a project).

[roshfe]

'Support' wrote:

Hello and thanks for examples

Try attached file, both problems should be solved with this patched unit (just replace a file and rebuild a project).

Hi Serge:

Thank you very much for addressing this for us. I have downloaded and re-installed using the new .pas file. My initial tests all look promising. We will be testing over the next few days. If there are any problems found, we will post them here.

Cheers…

Shawn

[Author]

Posts