如何让ScrollBox里的IMAGE,随着IMAGE的增大或者缩小,总让IMAGE图象显示在ScrollBox中心位置(100分)

如何让ScrollBox里的IMAGE,随着IMAGE的增大或者缩小,总让IMAGE图象显示在ScrollBox中心位置如何让ScrollBox里的IMAGE,随着IMAGE的增大或者缩小,总让IMAGE图象显示在ScrollBox中心位置

if Image1.Height>ScrollBox1.Height then
ScrollBox1.VertScrollBar.Position:=(ScrollBox1.VertScrollBar.Range-ScrollBox1.Height+24) div 2
else
Image1.Top:=(ScrollBox1.Height-Image1.Height) div 2;

同理你可以控制横向

好久都没有这种感激之情了,太感谢你了