scrollBox问题(0分)

F

forxl

Unregistered / Unconfirmed
GUEST, unregistred user!
我在scrollBox里面加了个Timage控件,可是当image的宽或高超过大于scrollBox的宽和高
的时候,并没出现滚动条,我已经把autoscroll设为true了
 
是你的图片大了,Timage空间也变大舅滚动了嘛;
Timage.Autosize := true;
OK;
 
还是不行
我是在Timage上画图的,但是我想和这没关系
应该只要把TImage的高或宽超过scrollBox,就会出现滚动条的吧
 
这应该是一个坐标系的问题,你的image肯定是超出的部分是在左上。应该指定
image的左,上,你再试试。
 
可以了,多谢
得把Image1的align设成alNone,autosize设成false
 
可以用FormResize()方法啊
把Image的两个属性值width和height传给HorzScrollBar.Range和VerScrollBar.Range 就行啦

HorzScrollBar.Range := Image.Picture.Width;
VerScrollBar.Range := Image.Picture.Height;
 
顶部