Ärger bei Scrollbox mit .Min, .Max und PageSize

[delphin]

Hallo,

ich frage mich schon seit Tagen, wo mein Denkfehler liegt. Vielleicht kann mir jemannd weiterhelfen.

Ich habe einen eigenen Scrollbalken erzeugt, der mir von einem vorhanden Bild den betreffenden Ausschnitt proportional anzeigen und beim Klicken mit Hilfe einer Scrollbox verschieben soll.

z.B.: gesamtes Bild = 100 Pixel, sichtbarer Ausschnitt = 50 Pixel

ergibt sich doch:

ScrollBar1.Min := 1; ScrollBar1.Max = 100; ScrollBar1.PageSize = 50 (oder ???)

Verschiebt man nun den Scrollbalken direkt mit der Maus ans Ende der Leiste erhält man bei Abfrage im OnScroll-Ereignis genau wie bei Abfrage im OnChange-Ereignis als ScrollBar1.Position das Ergebnis = 51; (wobei eigentlich 50 zu erwarten wäre!)

Wird aber noch besser: Klick man nun weiter mit der Maus auf die Pfeil-Runter Taste läuft die ScrollBar1.Position tätsächlich noch bis 100 !!! ohne den Balken weiter zu verschieben (wie auch - steht ja schon am Ende)

Wer kann mir das jemand erklären ???