我在TScrollBox中放了一个图形，我想在图形放大后, 让图形居中，让TScrollBox的滚动条也居中，即让TScrollBox滚动一下.怎么设置TScrollBo

Question

我在TScrollBox中放了一个图形，我想在图形放大后, 让图形居中，让TScrollBox的滚动条也居中，即让TScrollBox滚动一下.怎么设置TScrollBox的滚动条的位置居中

Answer 1

 int :=  ScrollBox1.HorzScrollBar.Size;ScrollBox1.HorzScrollBar.ScrollPos := int div 2;

Answer 2

int :=  ScrollBox1.HorzScrollBar.Size;ScrollBox1.HorzScrollBar.ScrollPos := int div 2;

Answer 3

ScrollBox1.HorzScrollBar.ScrollPos := int div 2;ScrollPos属性是只读的

Answer 4

不好意思，写错了，呵呵ScrollBox1.HorzScrollBar.Position := int div 2;

Answer 5

ScrollBox_paper.HorzScrollBar.Size返回的值总是0