Hi,
I just fixed bug 907. And while doing so, I ran in the win32 scrolling
problem. The win32 scroll message has a "limited" pos (it's a shortInt).
So in cases with more than 32k items.
The win32 way to work around this is to use the GetScrollInfo function
to retrieve the current position. However when tracking, you need to
query a different value than when not.
All this overhead/extra lines of code, just for some broken win32 api,
while other interfaces already have this info.
So, I've changed the TLMScroll record. I renamed the original pos field
to SmallPos and I added a Pos filed with the size of LongInt.
This way the code stays compatible and when using the LCL implementation
(TLMScroll) you don't have to worry about a position overflow. When
using the win32 (TWMScroll) way of implementation it is up to you to
retrieve the correct value.
Marc
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives