一个关于滚动条的问题(50分)

  • 主题发起人 主题发起人 gravel
  • 开始时间 开始时间
G

gravel

Unregistered / Unconfirmed
GUEST, unregistred user!
假设image上的当前点的坐标为a(x1,y1),如何设置HorzScrollBar.Position
与vertscrollbar.position,让image放大后使a点可见。

 
呵呵, 取百分比呀:
aaa:=a.y/image.height; //把百分比存起来
放大后
horzscrollbar.max:=image.height;
horzscrollbar.position:=ord(aaa*horzscrollbar.max);
同理可得.
 
horzscrollbar.max 是什么?
 
按cytown所说,把horzscrollbar.max改成horzscrollbar.range即可.
 
TImage Component并没有ScrollBar呀?
HorzScrollBar.Range := Image.Width;
VertScrollBar.Range := Image.Height;
HorzScrollBar.Position := X1;
VertScrollBar.Position := Y1;

不行吗?
 
sorry,我想我解释有点不清楚,我放了一个image控件在form的panel上,然后放了
一个scrollbox在image上,如何设置scrollbox,使A(x1,y1)无论image
放大多少倍后仍在可见区域(不用拖动滚动条)。
 
多人接受答案了。
 

Similar threads

回复
0
查看
813
不得闲
S
回复
0
查看
730
SUNSTONE的Delphi笔记
S
S
回复
0
查看
738
SUNSTONE的Delphi笔记
S
后退
顶部