Delphi 颜色RGB的常用.docVIP

Delphi 颜色RGB的常用 delphi颜色2009-12-29 09:40delphi颜色 //1. RGB 模式： Self.Color := $0000ff;//红 Self.Color := $00ff00;//绿 Self.Color := $ff0000;//蓝 //不过和HTML中的 #ff0000 #00ff00 #0000ff是相反的，应该叫BGR。 //2. RGB 分值，譬如： Self.Color := RGB(255,0,0);//红色 Self.Color := RGB(0,255,0);//绿色 Self.Color := RGB(0,0,255);//蓝色 //3. Delphi 中的标准模式： Self.Color := $000000ff;//红色 Self.Color := $0000ff00;//绿色 Self.Color := $00ff0000;//蓝色 //其中低3位字节代表RGB(BGR)相应的颜色； //如果最高位字节是$00,则表示用系统调色板中最相近的颜色； //最高位字节是$01，则表示用当前调色板中最相近的颜色匹配； //最高位字节是$02，则用当前设备描述表中逻辑调色板的次相近颜色匹配。 //4. 整数： Self.Color := 255;//红色 Self.Color := 4080;//绿色 Self.Color := 65280;//蓝色 //十六进制转换来的整数。 //5. 颜色常量： Self.Color := clRed; Self.Color := clGreen; Self.Color := clBlue; //6. Delphi 预定义的颜色常量有： clSystemColor = $FF000000; clScrollBar = TColor(clSystemColor or COLOR_SCROLLBAR); clBackground = TColor(clSystemColor or COLOR_BACKGROUND); clActiveCaption = TColor(clSystemColor or COLOR_ACTIVECAPTION); clInactiveCaption = TColor(clSystemColor or COLOR_INACTIVECAPTION); clMenu = TColor(clSystemColor or COLOR_MENU); clWindow = TColor(clSystemColor or COLOR_WINDOW); clWindowFrame = TColor(clSystemColor or COLOR_WINDOWFRAME); clMenuText = TColor(clSystemColor or COLOR_MENUTEXT); clWindowText = TColor(clSystemColor or COLOR_WINDOWTEXT); clCaptionText = TColor(clSystemColor or COLOR_CAPTIONTEXT); clActiveBorder = TColor(clSystemColor or COLOR_ACTIVEBORDER); clInactiveBorder = TColor(clSystemColor or COLOR_INACTIVEBORDER); clAppWorkSpace = TColor(clSystemColor or COLOR_APPWORKSPACE); clHighlight = TColor(clSystemColor or COLOR_HIGHLIGHT); clHighlightText = TColor(clSystemColor or COLOR_HIGHLIGHTTEXT); clBtnFace = TColor(clSystemColor or COLOR_BTNFACE); clBtnShadow = TColor(clSystemColor or COLOR_BTNSHADOW); clGrayText = TColor(clSystemColor or COLOR_GRAYTEXT); clBtnText = TColor(clSystemColor or COLOR_BTNTEXT); clInactiveCaptionText = TColor(clSystemColor or COLOR_INACTIVECAPTIONTEXT); clBtnHighlight = TColor(clSystemColor or COLOR_BTNHIGHLIGHT); cl3DDk