From b441e37b32c40d5ac5865d85cb86794d4f8ae909 Mon Sep 17 00:00:00 2001
From: andrew <andrew@lazarus-ide.org>
Date: Sun, 1 Aug 2010 19:30:36 +0000
Subject: [PATCH] * applied patch from Bernd Kreuss for bug #17081

git-svn-id: trunk@26964 -
---
 components/turbopower_ipro/iphtml.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/turbopower_ipro/iphtml.pas b/components/turbopower_ipro/iphtml.pas
index 4452753a8b..700ad9b0f4 100644
--- a/components/turbopower_ipro/iphtml.pas
+++ b/components/turbopower_ipro/iphtml.pas
@@ -17768,7 +17768,7 @@ begin
       if FCalcRange > 32767 then
         SetPosition(GetRealScrollPosition)
       else
-          SetPosition( FPosition + (Pos - FPosition) * FIncrement );
+        SetPosition(Pos);
     SB_THUMBTRACK:
       if Tracking then
         if FCalcRange > 32767 then