html 颜色常量,Delphi 中的颜色常量及效果图

颜色名称

颜色效果

Hex

HTML

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=$000000

clMaroon=$000080

clGreen=$008000

clOlive=$008080

clNavy=$800000

clPurple=$800080

clTeal=$808000

clGray=$808080

clSilver=$C0C0C0

clRed=$0000FF

clLime=$00FF00

clYellow=$00FFFF

clBlue=$FF0000

clFuchsia=$FF00FF

clAqua=$FFFF00

clLtGray=$C0C0C0

clDkGray=$808080

clWhite=$FFFFFF

clMoneyGreen=$C0DCC0

clSkyBlue=$F0CAA6

clCream=$F0FBFF

clMedGray=$A4A0A0

clWebSnow=$FAFAFF

clWebFloralWhite=$F0FAFF

clWebLavenderBlush=$F5F0FF

clWebOldLace=$E6F5FD

clWebIvory=$F0FFFF

clWebCornSilk=$DCF8FF

clWebBeige=$DCF5F5

clWebAntiqueWhite=$D7EBFA

clWebWheat=$B3DEF5

clWebAliceBlue=$FFF8F0

clWebGhostWhite=$FFF8F8

clWebLavender=$FAE6E6

clWebSeashell=$EEF5FF

clWebLightYellow=$E0FFFF

clWebPapayaWhip=$D5EFFF

clWebNavajoWhite=$ADDEFF

clWebMoccasin=$B5E4FF

clWebBurlywood=$87B8DE

clWebAzure=$FFFFF0

clWebMintcream=$FAFFF5

clWebHoneydew=$F0FFF0

clWebLinen=$E6F0FA

clWebLemonChiffon=$CDFAFF

clWebBlanchedAlmond=$CDEBFF

clWebBisque=$C4E4FF

clWebPeachPuff=$B9DAFF

clWebTan=$8CB4D2

clWebYellow=$00FFFF

clWebDarkOrange=$008CFF

clWebRed=$0000FF

clWebDarkRed=$00008B

clWebMaroon=$000080

clWebIndianRed=$5C5CCD

clWebSalmon=$7280FA

clWebCoral=$507FFF

clWebGold=$00D7FF

clWebTomato=$4763FF

clWebCrimson=$3C14DC

clWebBrown=$2A2AA5

clWebChocolate=$1E69D2

clWebSandyBrown=$60A4F4

clWebLightSalmon=$7AA0FF

clWebLightCoral=$8080F0

clWebOrange=$00A5FF

clWebOrangeRed=$0045FF

clWebFirebrick=$2222B2

clWebSaddleBrown=$13458B

clWebSienna=$2D52A0

clWebPeru=$3F85CD

clWebDarkSalmon=$7A96E9

clWebRosyBrown=$8F8FBC

clWebPaleGoldenrod=$AAE8EE

clWebLightGoldenrodYellow=$D2FAFA

clWebOlive=$008080

clWebForestGreen=$228B22

clWebGreenYellow=$2FFFAD

clWebChartreuse=$00FF7F

clWebLightGreen=$90EE90

clWebAquamarine=$D4FF7F

clWebSeaGreen=$578B2E

clWebGoldenRod=$20A5DA

clWebKhaki=$8CE6F0

clWebOliveDrab=$238E6B

clWebGreen=$008000

clWebYellowGreen=$32CD9A

clWebLawnGreen=$00FC7C

clWebPaleGreen=$98FB98

clWebMediumAquamarine=$AACD66

clWebMediumSeaGreen=$71B33C

clWebDarkGoldenRod=$0B86B8

clWebDarkKhaki=$6BB7BD

clWebDarkOliveGreen=$2F6B55

clWebDarkgreen=$006400

clWebLimeGreen=$32CD32

clWebLime=$00FF00

clWebSpringGreen=$7FFF00

clWebMediumSpringGreen=$9AFA00

clWebDarkSeaGreen=$8FBC8F

clWebLightSeaGreen=$AAB220

clWebPaleTurquoise=$EEEEAF

clWebLightCyan=$FFFFE0

clWebLightBlue=$E6D8AD

clWebLightSkyBlue=$FACE87

clWebCornFlowerBlue=$ED9564

clWebDarkBlue=$8B0000

clWebIndigo=$82004B

clWebMediumTurquoise=$CCD148

clWebTurquoise=$D0E040

clWebCyan=$FFFF00

clWebAqua=$FFFF00

clWebPowderBlue=$E6E0B0

clWebSkyBlue=$EBCE87

clWebRoyalBlue=$E16941

clWebMediumBlue=$CD0000

clWebMidnightBlue=$701919

clWebDarkTurquoise=$D1CE00

clWebCadetBlue=$A09E5F

clWebDarkCyan=$8B8B00

clWebTeal=$808000

clWebDeepskyBlue=$FFBF00

clWebDodgerBlue=$FF901E

clWebBlue=$FF0000

clWebNavy=$800000

clWebDarkViolet=$D30094

clWebDarkOrchid=$CC3299

clWebMagenta=$FF00FF

clWebFuchsia=$FF00FF

clWebDarkMagenta=$8B008B

clWebMediumVioletRed=$8515C7

clWebPaleVioletRed=$9370DB

clWebBlueViolet=$E22B8A

clWebMediumOrchid=$D355BA

clWebMediumPurple=$DB7093

clWebPurple=$800080

clWebDeepPink=$9314FF

clWebLightPink=$C1B6FF

clWebViolet=$EE82EE

clWebOrchid=$D670DA

clWebPlum=$DDA0DD

clWebThistle=$D8BFD8

clWebHotPink=$B469FF

clWebPink=$CBC0FF

clWebLightSteelBlue=$DEC4B0

clWebMediumSlateBlue=$EE687B

clWebLightSlateGray=$998877

clWebWhite=$FFFFFF

clWebLightgrey=$D3D3D3

clWebGray=$808080

clWebSteelBlue=$B48246

clWebSlateBlue=$CD5A6A

clWebSlateGray=$908070

clWebWhiteSmoke=$F5F5F5

clWebSilver=$C0C0C0

clWebDimGray=$696969

clWebMistyRose=$E1E4FF

clWebDarkSlateBlue=$8B3D48

clWebDarkSlategray=$4F4F2F

clWebGainsboro=$DCDCDC

clWebDarkGray=$A9A9A9

clWebBlack=$000000

第二步, 写了个小程序:unit Unit1;

interface

uses

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] := '

' + s1 +

'

' + s2 + '' + s3 + '';

end;

List.SaveToFile('c:\temp\Html.txt');

List.Free;

end;

end.

第三步, 添加表头表尾.

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值