ScrollBox

1 отговора 65 прегледа
#1

ScrollBox

Как може да се направи съдържанието на ScrollBox да се превърта без да се използват плъзгачите на ScrollBar-a , а с клик на мишката върху съдържанието на ScrollBox-a и движение на горе или надолу да се придвижва(съдържанието) в желаната посока, като ScrollBar-a да отразява текущата позиция.Нещо подобно като в Acrobat Reader.
10x

Отговор
в отговор на Scroll #2

Трябва да е много лесно :)

Трябва да е много лесно :)
Например:
1. Слагаш Image1 (tImage), СкролБокса (размерите на Image1 трябва да са по- големи :))
2. Прехващаш MouseMove на скролбокса и манипулираш Имаге1.Лефт и Топ, в зависимост от положението на мишката:
Image1.Top:=-(Image1.Height-ScrollBox1.Height)*Y/ScrollBox1.Height;
Това по-горе установява:
a) при Y=0, т.е. когато мишката е най-горе:
Image1.Top:=0;
b) при Y=ScrollBox1.Top, т.е. когато мишката е най-долу:
Image1.Top:=-(Image1.Height-ScrollBox1.Height);

По X е аналогично.
Razbira se, ne sym go probwal


Редактирано от NikB на

Отговор