Delphi中画布应用两则.docVIP

Delphi中画布应用两则 关键字：Delphi、画布、背景色、分割图像 ---- 在Delphi 中， 窗 体、BitBtn 控 件、SpeedButton 控件和PaintBox等控件都具有画布属性。调用Canvas的作图函数可以在屏幕上画图，如画圆、画线等。另外，Canvas有一个属性叫Pixels，Pixels是一个二维数组，它的一个元素对应着屏幕上的一个像素点，数组元素的值代表像素点的颜色。利用Canvas的属性Pixels可以实现一些有趣的功能，下面介绍它的两则应用。 ----1.制作背景色 ----我们在一些软件的安装界面可以看到由深到浅的背景色，看起来效果相当不错。在Delphi中利用Canvas的属性Pixels可以制作这样的背景色，只要按行或按列改变像素点的颜色就可以了。一个示例程序的编制过程如下： ----建立一个新的应用程序。 ----把Form1的属性BorderStyle改为bsNone，在Form1的OnDblClick事件中，键入代码后如下所示： ; varMyColor:Longint; x,y:Word; begin MyColor:=$33;{颜色基数} withCanvasdo begin {当x坐标在外循环，y坐标在内 循环时