Передвигание Shape при помощи ScrollBar

← →
Свой, но не чужой (2002-10-05 22:57) [0]

Есть объект Shape на форме Form1. Есть вертикальная и горизонтальная полосы прокрутки. Как с помощью этих полос прокруток передвигать фигуру по форме. Только объяните подробно, а то я тоже сделал, только такая фигня получилась. Столько глюков. Сказал, лучше на форуме спрошу...
HELP!

← →
croupier © (2002-10-06 06:25) [1]

А в чем глюк то?

← →
Свой, но не чужой (2002-10-06 13:05) [2]

Гюка нет, просто не могу нормально осуществить это.
Привидите пример, плиз!

← →
BOA_KAA © (2002-10-06 13:15) [3]

Проще будет, если кинешь на форму TScrollBar, а на него уже свой Shape. Только поставь свойство ScrollBar1.AutoScroll = True. И все будет работать замечательно.

Чего-то я не могу понять в чем проблема, старею))))

Чем простое изменение плохо?
hscroll1.maxvalue:=form1.clientwidth-shape1.width;
shape1.left:=hscroll1.value;

Передвигание Shape при помощи ScrollBar Найти похожие ветки