Go homepage(回首页)
Upload pictures (上传图片)
Write articles (发文字帖)

The author:(作者)aaa
published in(发表于) 2014/7/19 0:08:50
delphiRTF 编辑组件（TRichEdit）使用实例

delphiGDI图像编程:颜色类（TColor）

颜色类（TColor）

    TColor 用于定义一个对象的颜色。很多部件的颜色属性就是TColor 类型，在Graphics 单元中TColor 定义如下：

type TColor = -$7FFFFFFF-1..$7FFFFFFF;

     这是一个32 位二进制数据。Graphic 单元中还定义了一些常用的颜色常量，这些常量或直接映射成系统调色板中最相近的颜色，或映射成Windows 控制面板中颜色部分的系统视频颜色。

     Color 性质将决定画笔的颜色。在Delphi 中提供了许多颜色的预定常数，这些预设颜色都以cl（cl代表Color）为起始字元命名。例如clRed 代表红色，clBlue 代表蓝色，clGreen 代表绿色等。另外Delphi也将Windows 的基本颜色以常数定义，如clWindow 及clMenu 分别代表Window 及Menu 的颜色。以下列出部分C++ Builder 定义的颜色常数，记住一些常用的常数会提高程序写作的效率；读者不必完全记住它，在需要时，可以直接使用在线帮助。

·clBlack 黑色 clMaroon 茶色

·clGreen 绿色 clOlive 橄榄绿

·clNavy 海蓝色 clPurple 紫色

·clTeal 青紫色 clGray 灰色

·clSilver 银色 clRed 红色

·clime 灰绿色 clBlue 蓝色

·clFuchsia 紫红色 clAqua 淡绿青色

·clWhite 白色 clBackground Window 背景色

·clActiveCaption 活动视窗的标题色 clInactiveCaption 非活动视窗的标题色

·clMenu Menu 的颜色 clWindow Windows 的背景色

·clWindowFrame Window Fram 的颜色 clMenuText Menu 文字的颜色

·clWindowText Window 内文字的颜色 clCaptionText 标题文字的颜色

·clActiveBorder 活动视窗的边界颜色 clInactiveBorder 非活动视窗的边界颜色

·clAppWorkSpace 视窗工作区域的颜色 clHighlight 高亮度Windows 颜色

·clHightlightText 被选取文字的颜色 clBtnFace Button 颜色

·clBtnShadow Button 影子颜色 clGrayText 灰色文字色

·clBtnText Button 内文字颜色 clBtnHighlight Button 高亮度颜色

映射程序用4B 的二进制码来定义颜色，低3 位字节代表RGB 相应的颜色，如$00FF0000 表示纯

蓝，$0000FF00 表示纯绿，$000000FF 表示纯红，$00000000 表示黑色，$00FFFFFF 表示白色。如果

最高位字节是$00 则表示用系统调色板中最相近的颜色；最高位字节是$01，则表示用当前调色板中最

相近的颜色匹配；最高位字节是$02，则用当前设备描述表中逻辑调色板的次相近颜色匹配。

下面举一个用TColor 来设置文字、图形和背景颜色的例子。

打开一个新工程，在Form1 的OnPaint 事件中加入如下代码：

procedure TForm1.FormPaint(Sender: TObject);

begin

Canvas.Font.Color := clRed;

Canvas.Pen.Color := RGB(0,255,0);

Canvas.Brush.Color := $00FF0000;

Canvas.TextOut(20,20,′color′);

    Canvas.Rectangle(60,60,200,140);

end;

赞