FiveTech Support Forums

Hello,

I found some Problems using => TScrWnd():New(...

1. On Image-end ( bottom and right ) the Thumbs are not related to the Image.
2. Using a Brush on a transparent Image, there is a wrong painting scrolling the Image.

Without using => oScroll:SetScroll( 1, 9, 1, 12) with Range-define



I'm looking for a Calculation, to adjust the Thumbpos of TScrWnd():New(... related to the Image-size.

The original Image


Image zoomed inside a defined Dialog-size


oScroll := TScrWnd():New(oDlg, 1, nDlgH, 1, nDlgW) // Dialog-size

In Relation to the Image-size, I used a Factor to adjust the Thumb-pos like :

If nNewHeight >= 760 .or. nNewWidth >= 760 // image-size
oScroll:SetScroll( 1, 9, 1, 12)
Endif

This sample shows the Thumb on Image-bottom.

Because I couldn't find any Logic, Is there maybe a Formula ?

Best Regards
Uwe