“异形”按钮非常有趣,就是按钮的外形不是标准的长方形或正方形,而有一丝“叛逆”——“异形”嘛,是不是?怎样才能实现“异形”按钮呢?由于Window 95增加了对窗口区域概念的支持,使得窗口区域就是所定义的窗口看上去的外形,窗口区域作为窗口的实际边界区域,这样窗口区域不仅定义了窗口的可画区域,而且定义了窗口下隐含区域和响应鼠标击键事件的响应窗口区域。
按钮的各种外形是在运行时设置的而不是在设计时设置。设计时按钮的外形仍然是长方形或正方形。
按钮外形的设计分成两个步骤:
第一步创建按钮的外形,即定义窗口区域。使用API的区域创建函数就可达到目的。区域创建函数很多,主要有CreateEllipticRgn 、CreatePolygonRgn、 CreateRectRgn、 CreateRoundRectRgn,用于创建不同类型的区域显示。假如需要一个复杂区域外形,那么可以分别使用不同的区域函数创建不同的区域,然后调用CombineRgn API函数把它们组合起来。所以说,不仅可以创建出圆形、三角形的按钮,而且还可以创建出其它各种外形的按钮。
第二步将区域显示应用到窗口上。一旦使用区域函数创建了一个新的区域显示,就可以使用SetWindowsRgn函数将这个区域应用到窗口上。
下面给出圆形、三角形按钮实现的具体代码。为了直观显示效果,将窗体的背景色设置为了黑色(Color设置为clBTnText),并将两个按钮的Cursor设置crCross。在窗体放置两个Button按钮,分别定义为RButton、TButton。实现窗口区域的最佳时机是在窗体首次创建时,所以将处理程序放在OnCreate事件中。
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//创建园形按钮
HRGN hRgnR = CreateEllipticRgn(0,0,RButton→
Width,RButton→Height);
SetWindowRgn(RButton→Handle,hRgnR,TRUE);
//创建三角形按钮
TrPoint[0].x=TButton→Width/2;
TrPoint[0].y=0;
TrPoint[1].x=0;
TrPoint[1].y=TButton→Height;
TrPoint[2].x=TButton→Width;
TrPoint[2].y=TButton→Height;
HRGN hRgnT = CreatePolygonRgn(TrPoint,3,ALTERNATE);
SetWindowRgn(TButton→Handle,hRgnT,TRUE);
}
其中TrPoint在Unit.h头文件中定义如下:
private: // User declarations
POINT TrPoint[3];
上面的代码在按钮的边界内分别创建了一个园形区域和一个三角形区域,然后作为新的窗口区域把它赋给各自的按钮。在创建园形按钮时使用了椭圆形区域创建函数,要使按钮为园形在设计时该按钮应设计为正方形。另外区域是以按钮坐标的形式定义的,而不是用屏幕坐标。(0,0)点是按钮的最左上角,而(宽,高)点是按钮的最右下角。
应该注重的是,一旦将区域句柄赋给按钮,就不能再对区域句柄作任何操作。假如将区域句柄赋给按钮后,修改或删除这个句柄将导致程序崩溃,所以……千万不要这样做,否则,你的程序虽然花哨了一些,但却是“拾了芝麻丢了西瓜”而因小失大!说到这里,我想,程序设计首先要注重“稳定性”,至于其它的都次要。