打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
Delphi 中的颜色常量及效果图
颜色名称  颜色效果  HexHTML
clBlack$000000#000000
clMaroon$000080#800000
clGreen$008000#008000
clOlive$008080#808000
clNavy$800000#000080
clPurple$800080#800080
clTeal$808000#008080
clGray$808080#808080
clSilver$C0C0C0#C0C0C0
clRed$0000FF#FF0000
clLime$00FF00#00FF00
clYellow$00FFFF#FFFF00
clBlue$FF0000#0000FF
clFuchsia$FF00FF#FF00FF
clAqua$FFFF00#00FFFF
clLtGray$C0C0C0#C0C0C0
clDkGray$808080#808080
clWhite$FFFFFF#FFFFFF
clMoneyGreen$C0DCC0#C0DCC0
clSkyBlue$F0CAA6#A6CAF0
clCream$F0FBFF#FFFBF0
clMedGray$A4A0A0#A0A0A4
clWebSnow$FAFAFF#FFFAFA
clWebFloralWhite$F0FAFF#FFFAF0
clWebLavenderBlush$F5F0FF#FFF0F5
clWebOldLace$E6F5FD#FDF5E6
clWebIvory$F0FFFF#FFFFF0
clWebCornSilk$DCF8FF#FFF8DC
clWebBeige$DCF5F5#F5F5DC
clWebAntiqueWhite$D7EBFA#FAEBD7
clWebWheat$B3DEF5#F5DEB3
clWebAliceBlue$FFF8F0#F0F8FF
clWebGhostWhite$FFF8F8#F8F8FF
clWebLavender$FAE6E6#E6E6FA
clWebSeashell$EEF5FF#FFF5EE
clWebLightYellow$E0FFFF#FFFFE0
clWebPapayaWhip$D5EFFF#FFEFD5
clWebNavajoWhite$ADDEFF#FFDEAD
clWebMoccasin$B5E4FF#FFE4B5
clWebBurlywood$87B8DE#DEB887
clWebAzure$FFFFF0#F0FFFF
clWebMintcream$FAFFF5#F5FFFA
clWebHoneydew$F0FFF0#F0FFF0
clWebLinen$E6F0FA#FAF0E6
clWebLemonChiffon$CDFAFF#FFFACD
clWebBlanchedAlmond$CDEBFF#FFEBCD
clWebBisque$C4E4FF#FFE4C4
clWebPeachPuff$B9DAFF#FFDAB9
clWebTan$8CB4D2#D2B48C
clWebYellow$00FFFF#FFFF00
clWebDarkOrange$008CFF#FF8C00
clWebRed$0000FF#FF0000
clWebDarkRed$00008B#8B0000
clWebMaroon$000080#800000
clWebIndianRed$5C5CCD#CD5C5C
clWebSalmon$7280FA#FA8072
clWebCoral$507FFF#FF7F50
clWebGold$00D7FF#FFD700
clWebTomato$4763FF#FF6347
clWebCrimson$3C14DC#DC143C
clWebBrown$2A2AA5#A52A2A
clWebChocolate$1E69D2#D2691E
clWebSandyBrown$60A4F4#F4A460
clWebLightSalmon$7AA0FF#FFA07A
clWebLightCoral$8080F0#F08080
clWebOrange$00A5FF#FFA500
clWebOrangeRed$0045FF#FF4500
clWebFirebrick$2222B2#B22222
clWebSaddleBrown$13458B#8B4513
clWebSienna$2D52A0#A0522D
clWebPeru$3F85CD#CD853F
clWebDarkSalmon$7A96E9#E9967A
clWebRosyBrown$8F8FBC#BC8F8F
clWebPaleGoldenrod$AAE8EE#EEE8AA
clWebLightGoldenrodYellow$D2FAFA#FAFAD2
clWebOlive$008080#808000
clWebForestGreen$228B22#228B22
clWebGreenYellow$2FFFAD#ADFF2F
clWebChartreuse$00FF7F#7FFF00
clWebLightGreen$90EE90#90EE90
clWebAquamarine$D4FF7F#7FFFD4
clWebSeaGreen$578B2E#2E8B57
clWebGoldenRod$20A5DA#DAA520
clWebKhaki$8CE6F0#F0E68C
clWebOliveDrab$238E6B#6B8E23
clWebGreen$008000#008000
clWebYellowGreen$32CD9A#9ACD32
clWebLawnGreen$00FC7C#7CFC00
clWebPaleGreen$98FB98#98FB98
clWebMediumAquamarine$AACD66#66CDAA
clWebMediumSeaGreen$71B33C#3CB371
clWebDarkGoldenRod$0B86B8#B8860B
clWebDarkKhaki$6BB7BD#BDB76B
clWebDarkOliveGreen$2F6B55#556B2F
clWebDarkgreen$006400#006400
clWebLimeGreen$32CD32#32CD32
clWebLime$00FF00#00FF00
clWebSpringGreen$7FFF00#00FF7F
clWebMediumSpringGreen$9AFA00#00FA9A
clWebDarkSeaGreen$8FBC8F#8FBC8F
clWebLightSeaGreen$AAB220#20B2AA
clWebPaleTurquoise$EEEEAF#AFEEEE
clWebLightCyan$FFFFE0#E0FFFF
clWebLightBlue$E6D8AD#ADD8E6
clWebLightSkyBlue$FACE87#87CEFA
clWebCornFlowerBlue$ED9564#6495ED
clWebDarkBlue$8B0000#00008B
clWebIndigo$82004B#4B0082
clWebMediumTurquoise$CCD148#48D1CC
clWebTurquoise$D0E040#40E0D0
clWebCyan$FFFF00#00FFFF
clWebAqua$FFFF00#00FFFF
clWebPowderBlue$E6E0B0#B0E0E6
clWebSkyBlue$EBCE87#87CEEB
clWebRoyalBlue$E16941#4169E1
clWebMediumBlue$CD0000#0000CD
clWebMidnightBlue$701919#191970
clWebDarkTurquoise$D1CE00#00CED1
clWebCadetBlue$A09E5F#5F9EA0
clWebDarkCyan$8B8B00#008B8B
clWebTeal$808000#008080
clWebDeepskyBlue$FFBF00#00BFFF
clWebDodgerBlue$FF901E#1E90FF
clWebBlue$FF0000#0000FF
clWebNavy$800000#000080
clWebDarkViolet$D30094#9400D3
clWebDarkOrchid$CC3299#9932CC
clWebMagenta$FF00FF#FF00FF
clWebFuchsia$FF00FF#FF00FF
clWebDarkMagenta$8B008B#8B008B
clWebMediumVioletRed$8515C7#C71585
clWebPaleVioletRed$9370DB#DB7093
clWebBlueViolet$E22B8A#8A2BE2
clWebMediumOrchid$D355BA#BA55D3
clWebMediumPurple$DB7093#9370DB
clWebPurple$800080#800080
clWebDeepPink$9314FF#FF1493
clWebLightPink$C1B6FF#FFB6C1
clWebViolet$EE82EE#EE82EE
clWebOrchid$D670DA#DA70D6
clWebPlum$DDA0DD#DDA0DD
clWebThistle$D8BFD8#D8BFD8
clWebHotPink$B469FF#FF69B4
clWebPink$CBC0FF#FFC0CB
clWebLightSteelBlue$DEC4B0#B0C4DE
clWebMediumSlateBlue$EE687B#7B68EE
clWebLightSlateGray$998877#778899
clWebWhite$FFFFFF#FFFFFF
clWebLightgrey$D3D3D3#D3D3D3
clWebGray$808080#808080
clWebSteelBlue$B48246#4682B4
clWebSlateBlue$CD5A6A#6A5ACD
clWebSlateGray$908070#708090
clWebWhiteSmoke$F5F5F5#F5F5F5
clWebSilver$C0C0C0#C0C0C0
clWebDimGray$696969#696969
clWebMistyRose$E1E4FF#FFE4E1
clWebDarkSlateBlue$8B3D48#483D8B
clWebDarkSlategray$4F4F2F#2F4F4F
clWebGainsboro$DCDCDC#DCDCDC
clWebDarkGray$A9A9A9#A9A9A9
clWebBlack$000000#000000


这个表的制作过程:

第一步, 先从 Delphi 的源文件中提取并替换出下面的文本文件: clBlack=$000000clMaroon=$000080clGreen=$008000clOlive=$008080clNavy=$800000clPurple=$800080clTeal=$808000clGray=$808080clSilver=$C0C0C0clRed=$0000FFclLime=$00FF00clYellow=$00FFFFclBlue=$FF0000clFuchsia=$FF00FFclAqua=$FFFF00clLtGray=$C0C0C0clDkGray=$808080clWhite=$FFFFFFclMoneyGreen=$C0DCC0clSkyBlue=$F0CAA6clCream=$F0FBFFclMedGray=$A4A0A0clWebSnow=$FAFAFFclWebFloralWhite=$F0FAFFclWebLavenderBlush=$F5F0FFclWebOldLace=$E6F5FDclWebIvory=$F0FFFFclWebCornSilk=$DCF8FFclWebBeige=$DCF5F5clWebAntiqueWhite=$D7EBFAclWebWheat=$B3DEF5clWebAliceBlue=$FFF8F0clWebGhostWhite=$FFF8F8clWebLavender=$FAE6E6clWebSeashell=$EEF5FFclWebLightYellow=$E0FFFFclWebPapayaWhip=$D5EFFFclWebNavajoWhite=$ADDEFFclWebMoccasin=$B5E4FFclWebBurlywood=$87B8DEclWebAzure=$FFFFF0clWebMintcream=$FAFFF5clWebHoneydew=$F0FFF0clWebLinen=$E6F0FAclWebLemonChiffon=$CDFAFFclWebBlanchedAlmond=$CDEBFFclWebBisque=$C4E4FFclWebPeachPuff=$B9DAFFclWebTan=$8CB4D2clWebYellow=$00FFFFclWebDarkOrange=$008CFFclWebRed=$0000FFclWebDarkRed=$00008BclWebMaroon=$000080clWebIndianRed=$5C5CCDclWebSalmon=$7280FAclWebCoral=$507FFFclWebGold=$00D7FFclWebTomato=$4763FFclWebCrimson=$3C14DCclWebBrown=$2A2AA5clWebChocolate=$1E69D2clWebSandyBrown=$60A4F4clWebLightSalmon=$7AA0FFclWebLightCoral=$8080F0clWebOrange=$00A5FFclWebOrangeRed=$0045FFclWebFirebrick=$2222B2clWebSaddleBrown=$13458BclWebSienna=$2D52A0clWebPeru=$3F85CDclWebDarkSalmon=$7A96E9clWebRosyBrown=$8F8FBCclWebPaleGoldenrod=$AAE8EEclWebLightGoldenrodYellow=$D2FAFAclWebOlive=$008080clWebForestGreen=$228B22clWebGreenYellow=$2FFFADclWebChartreuse=$00FF7FclWebLightGreen=$90EE90clWebAquamarine=$D4FF7FclWebSeaGreen=$578B2EclWebGoldenRod=$20A5DAclWebKhaki=$8CE6F0clWebOliveDrab=$238E6BclWebGreen=$008000clWebYellowGreen=$32CD9AclWebLawnGreen=$00FC7CclWebPaleGreen=$98FB98clWebMediumAquamarine=$AACD66clWebMediumSeaGreen=$71B33CclWebDarkGoldenRod=$0B86B8clWebDarkKhaki=$6BB7BDclWebDarkOliveGreen=$2F6B55clWebDarkgreen=$006400clWebLimeGreen=$32CD32clWebLime=$00FF00clWebSpringGreen=$7FFF00clWebMediumSpringGreen=$9AFA00clWebDarkSeaGreen=$8FBC8FclWebLightSeaGreen=$AAB220clWebPaleTurquoise=$EEEEAFclWebLightCyan=$FFFFE0clWebLightBlue=$E6D8ADclWebLightSkyBlue=$FACE87clWebCornFlowerBlue=$ED9564clWebDarkBlue=$8B0000clWebIndigo=$82004BclWebMediumTurquoise=$CCD148clWebTurquoise=$D0E040clWebCyan=$FFFF00clWebAqua=$FFFF00clWebPowderBlue=$E6E0B0clWebSkyBlue=$EBCE87clWebRoyalBlue=$E16941clWebMediumBlue=$CD0000clWebMidnightBlue=$701919clWebDarkTurquoise=$D1CE00clWebCadetBlue=$A09E5FclWebDarkCyan=$8B8B00clWebTeal=$808000clWebDeepskyBlue=$FFBF00clWebDodgerBlue=$FF901EclWebBlue=$FF0000clWebNavy=$800000clWebDarkViolet=$D30094clWebDarkOrchid=$CC3299clWebMagenta=$FF00FFclWebFuchsia=$FF00FFclWebDarkMagenta=$8B008BclWebMediumVioletRed=$8515C7clWebPaleVioletRed=$9370DBclWebBlueViolet=$E22B8AclWebMediumOrchid=$D355BAclWebMediumPurple=$DB7093clWebPurple=$800080clWebDeepPink=$9314FFclWebLightPink=$C1B6FFclWebViolet=$EE82EEclWebOrchid=$D670DAclWebPlum=$DDA0DDclWebThistle=$D8BFD8clWebHotPink=$B469FFclWebPink=$CBC0FFclWebLightSteelBlue=$DEC4B0clWebMediumSlateBlue=$EE687BclWebLightSlateGray=$998877clWebWhite=$FFFFFFclWebLightgrey=$D3D3D3clWebGray=$808080clWebSteelBlue=$B48246clWebSlateBlue=$CD5A6AclWebSlateGray=$908070clWebWhiteSmoke=$F5F5F5clWebSilver=$C0C0C0clWebDimGray=$696969clWebMistyRose=$E1E4FFclWebDarkSlateBlue=$8B3D48clWebDarkSlategray=$4F4F2FclWebGainsboro=$DCDCDCclWebDarkGray=$A9A9A9clWebBlack=$000000

第二步, 写了个小程序:
unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;type  TForm1 = class(TForm)    Button1: TButton;    procedure Button1Click(Sender: TObject);  end;var  Form1: TForm1;implementation{$R *.dfm}{这是专为这个表写的一个转换函数}function HexColorToHtmlColor(s: string): string;var  i: Integer;  R,G,B: Byte;begin  i := StrToInt(s);  R := i and $FF;  G := (i shr 8) and $FF;  B := (i shr 16) and $FF;  Result := #35 + Format('%.2x%.2x%.2x',[R,G,B]);end;procedure TForm1.Button1Click(Sender: TObject);var  List: TStringList;  i: Integer;  s1,s2,s3: string;begin  List := TStringList.Create;  List.LoadFromFile('c:\temp\Delphi.txt');  for i := 0 to List.Count - 1 do  begin    s1 := List.Names[i];    s2 := List.ValueFromIndex[i];    s3 := HexColorToHtmlColor(s2);    List[i] := '<tr><td>' + s1 +      '</td><td style="background-color:' + s3 +      '"></td><td>' + s2 + '</td><td>' + s3 + '</td></tr>'end;  List.SaveToFile('c:\temp\Html.txt');  List.Free;end;end.
第三步, 添加表头表尾.
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
UIColor RGB颜色对照表
英文顔色对照表
【c#定义颜色】
css颜色代码对照
常用颜色表
色值图标
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服