C Builder中大尺寸图象的显示技巧

2008-02-23 05:25:57来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

在C Builder中利用TImage控件能够轻松地读入并显示图象,但TImage 控件本身不能够接收输入焦点,也没带有滚动条,在显示超出显示区域范围的大图象时,需要对TImage控件进行加强。本文提出两种最容易实现且有效的方法,满足不同应用的需求。

方法一:增加滚动条。

增加滚动条能够通过将TImage放在TScrollBox控件中来实现。步骤如下:
(1)、在窗体中放置一个TScrollBox控件,调整好其尺寸。
(2)、配置TScrollBox控件的AutoScroll属性为True。
(3)、在TScrollBox控件是放置一个TImage控件。
(4)、配置TImage控件的属性:AutoSize为True,Left为0,Top为0。经以上增强之后,假如TImage的图象比显示窗口大,滚动条会自动出现,假如图象小于显示窗口,滚动条自动消失,实现了大图象的浏览。

方法二:图象漫游。

图象漫游是指不用滚动条,通过键盘或鼠标控制图象的移动,从而在较小的显示区域内能够浏览图象的任何部分。下面以鼠标控制为例说明。
(1)、在窗体中放置一个TPanel控件,调整好其尺寸。
(2)、在TPanel控件是放置一个TImage控件。
(3)、配置TImage控件的AutoSize属性为True,Left属性为0,Top属性为0。
(4)、在TForm1的类定义中加两个私有变量:intiX0,iY0;
(5)、响应TImage控件的OnMouseDown和OnMouseMove事件。

void__fastcallTForm1::Image1MouseDown(TObject*Sender,
TMouseButtonButton,TShiftStateShift,intX,intY)
{
iX0=X;
iY0=Y;
}

void__fastcallTForm1::Image1MouseMove
(TObject*Sender,TShiftStateShift,intX,intY)
{
intiDeltaX,iDeltaY;
if(Shift.Contains(ssLeft))
{
iDeltaX=X-iX0;
iDeltaY=Y-iY0;
if(iDeltaY)
Image1->Left =iDeltaX;
if(iDeltaY)
Image1->Top =iDeltaY;
}
}

(6)、运行时按住鼠标左键拖动,图象将跟随移动。
(7)、假如通过键盘控制,只需参考鼠标控制的代码,加入键盘控制即可。
(8)、实际应用时,根据需要加入边界限制,确保图象不会被移出显示区域之外。

以上两种方法在本人研发的软件当中多次应用,效果很好。




标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇: 在C Builder中显示透明位图

下一篇: 利用CB研发特别的屏幕显示效果

热门词条
热门标签