益友软件工作室

加密金刚锁相关技术 → C++Builder类技术文章 → C++Builder中大尺寸图象的显示技巧

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

文章作者:佚名

在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的类定义中加两个私有变量:int iX0,iY0;

(5)响应TImage控件的OnMouseDown和OnMouseMove事件。

void __fastcall TForm1::Image1MouseDown(TObject *Sender,

TMouseButton Button, TShiftState Shift, int X, int Y)

{

iX0 = X;

iY0 = Y;

}

void __fastcall TForm1::Image1MouseMove

(TObject *Sender, TShiftState Shift, int X, int Y)

{

int iDeltaX, iDeltaY;

if(Shift.Contains(ssLeft))

{

iDeltaX = X - iX0;

iDeltaY = Y- iY0;

if(iDeltaY)

Image1->Left += iDeltaX;

if(iDeltaY)

Image1->Top += iDeltaY;

}

}

(6)运行时按住鼠标左键拖动,图象将跟随移动。

(7)如果通过键盘控制,只需参考鼠标控制的代码,加入键盘控制即可。

(8)实际应用时,根据需要加入边界限制,保证图象不会被移出显示区域之外。

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

特别申明

本栏目的文章都是本人从网上搜集而来,仅供大家学习研究之用,请不要用于商业目的!其中署名“佚名”的,意思是作者不详。如果某些文章未署你的名字,请来信告知,我会补上的。如果你认为某些文章侵犯了你的正当权宜,也请来信,我会将它删除。