Colors in Delphi

// Example in Red: // 1. RGB mode: Self. Color: = $ 0000ff; // However, It is opposite to # ff0000 in HTML and should be called BGR.
 // 2. RGB score, for example: Self. Color: = RGB (255, 0, 0 );
 // 3. standard mode in Delphi: Self. color: = $ 000000ff; // the lower three bytes represent the color of RGB (BGR). // if the highest byte is $00, it indicates the most similar color in the system palette; // The highest byte is $01, it indicates matching with the most similar color in the current palette; // The highest byte is $02, the logical palette of the current device description table is used for secondary similarity color matching.
 // 4. Integer: Self. Color: = 255; // an integer in hexadecimal format.
 // 5. color constant: Self. color: = clred; // pre-defined constants of 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 interval); clmenu = tcolor (clsystemcolor or color_menu); clwindow = tcolor (clsystemcolor or color_window ); clwindowframe = tcolor (clsystemcolor or color_windowframe); clmenutext = tcolor (clsystemcolor or plain); clwindowtext = tcolor (clsystemcolor or color_windowtext); clcaptiontext = tcolor (clsystemcolor or color_captiontext ); clactiveborder = tcolor (clsystemcolor or color_activeborder); clinactiveborder = tcolor (clsystemcolor or custom); clappworkspace = tcolor (clsystemcolor or color_appworkspace); clhighlight = tcolor (clsystemcolor or color_highlight ); clhighlighttext = tcolor (clsystemcolor or color_highlighttext); clbtnface = tcolor (clsystemcolor or color_btnface); plaintext = tcolor (clsystemcolor or plaintext); clgraytext = tcolor (clsystemcolor or color_graytext ); clbtntext = tcolor (clsystemcolor or color_btntext); clinactivecaptiontext = tcolor (clsystemcolor or plain); clbtnhighlight = tcolor (clsystemcolor or plain); cipher = tcolor (clsystemcolor or color_3ddkshadow ); cl3dlight = tcolor (clsystemcolor or color_3dlight); clinfotext = tcolor (clsystemcolor or color_infotext); clinfobk = tcolor (clsystemcolor or color_infobk); clhotlight = tcolor (clsystemcolor or color_hotlight ); frequency = tcolor (clsystemcolor or frequency); frequency = tcolor (clsystemcolor or frequency); clmenuhighlight = tcolor (clsystemcolor or color_menuhilight); clmenubar = tcolor (clsystemcolor or color_menubar ); clblack = tcolor ($000000); clmaroon = tcolor ($000080); clgreen = tcolor ($008000); clolive = tcolor ($008080); clnavy = tcolor ($800000 ); clpurple = tcolor ($800080); clteal = tcolor ($808000); clgray = tcolor ($808080); clsilver = tcolor ($ c0c0c0); clred = tcolor ($ 0000ff ); cllime = tcolor ($00ff00); clyellow = tcolor ($00 FFFF); clblue = tcolor ($ ff0000); clfuchsia = tcolor ($ ff00ff ); claqua = tcolor ($ FFFF00); clltgray = tcolor ($ c0c0c0); cldkgray = tcolor ($808080); clwhite = tcolor ($ ffffff); standardcolorscount = 16; clmoneygreen = tcolor ($ c0dcc0); clskyblue = tcolor ($ f0caa6); clcream = tcolor ($ f0fbff); clmedgray = tcolor ($ a4a0a0); extendedcolorscount = 4; clnone = tcolor ($1 fffffff); cldefault = tcolor ($20000000 ); {The following "Cl" values come from the Web named color palette and are stored in the Windows colorref byte order x00bbggrr} clwebsnow = $ fafaff; clwebfloralwhite = $ f0faff; cost = $ f5f0ff; response = $ response; response = $ f0ffff; response = $ dcf8ff; clwebbeige = $ dcf5f5; clwebantiquewhite = $ d7ebfa; clwebwheat = $ b3def5; response = $ fff8f0; response = $ fff8f8; response = $ fae6e6; response = $ eef5ff; clweblightyellow = $ e0ffff; response = $ d5efff; response = $ addeff; response = $ response; clwebburlywood = $ 87b8de; response = $ fffff0; token = $ fafff5; token = $ f0fff0; clweblinen = $ e6f0fa; token = $ cdfaff; token = $ cdebff; clwebbisque = $ c4e4ff; token = $ b9daff; clwebtan = $8cb4d2; // yellows/Reds yellow-> latency = $00 FFFF; clwebdarkorange = $ 008cff; clwebred = $ 0000ff; clwebdarkred = $ 00008b; clwebmaroon = $000080; clwebindianred = $ 5c5ccd; clwebsalmon = $ 7280fa; clwebcoral = $ 507fff; clwebgold = $ 00d7ff; bandwidth = $ 4763ff; bandwidth = $ response; clwebbrown = $2a2aa5; bandwidth = $1e69d2; bandwidth = $60a4f4; clweblightsalmon = $ 7aa0ff; cost = $8080f0; clweborange = $ 00a5ff; cost = $ 0045ff; cost = $2222b2; cost = $ 13458b; cost = $2d52a0; clwebperu = $ 3f85cd; response = $7a96e9; clwebrosybrown = $ 8f8fbc; // greens palegoldenrod-> response = $ aae8ee; response = $ d2fafa; clwebolive = $008080; clwebforestgreen = $228b22; clwebgreenyellow = $2 fffad; clwebchartreuse = $ 00ff7f; clweblightgreen = $90ee90; cost = $ scheme; cost = $ 578b2e; clwebgoldenrod = $ 20a5da; clwebkhaki = $8ce6f0; response = $ 238e6b; clwebgreen = $008000; clwebyellowgreen = $ 32cd9a; clweblawngreen = $ 00fc7c; response = $98fb98; response = $ aacd66; response = $ 71b33c; response = $0b86b8; response = $ 6bb7bd; response = $2f6b55; clwebdarkgreen = $006400; response = $32cd32; clweblime = $00ff00; clwebspringgreen = $7fff00; response = $9afa00; response = $ 8fbc8f; // Greens/blues lightseagreen-> links = $ aab220; links = $ eeeeaf; clweblightcyan = $ ffffe0; clweblightblue = $ e6d8ad; clweblightskyblue = $ face87; links = $ ed9564; clwebdarkblue = $8b0000; clwebindigo = $ 82004b; cost = $ c00008; clwebturquoise = $ d0e040; clwebcyan = $ FFFF00; // cost = $ FFFF00; clwebpowderblue = $ scheme; clwebskyblue = $ ebce87; clwebroyalblue = $ e16941; clwebmediumblue = $ cd0000; cost = $701919; cost = $ d1ce00; clwebcadetblue = $ scheme; cost = $ scheme; clwebteal = $808000; clwebdeepskyblue = $ ffbf00; cost = $ ff901e; clwebblue = $ ff0000; clwebnavy = $800000; // violets/pinks darkvilet-> latency = $ d30094; clwebdarkorchid = $ cc3299; clwebmagenta = $ ff00ff; // region = $ ff00ff; region = $ 8b008b; region = $8515c7; region = $ 9370db; clwebbluevilet = $ e22b8a; clwebmediumorchid = $ d355ba; response = $ db7093; clwebpurple = $800080; response = $ 9314ff; response = $ c1b6ff; clwebviolet = $ ee82ee; response = $ d670da; clwebplum = $ dda0dd; response = $ d8bfd8; clwebhotpink = $ b469ff; clwebpink = $ cbc0ff; // blue/gray/Black lightsteelblue-> blackclweblightsteelblue = $ dec4b0; bandwidth = $ ee687b; bandwidth = $998877; clwebwhite = $ ffffff; clweblightgrey = $ d3d3d3; clwebgray = $808080; clwebsteelblue = $ b48246; bandwidth = $ cd5a6a; bandwidth = $908070; bandwidth = $ scheme; clwebsilver = $ c0c0c0; clwebdimgray = $696969; clwebmistyrose = $ e1e4ff; cost = $8b3d48; cost = $ 4f4f2f; clwebgainsboro = $ dcdcdc; clwebdarkgray = $ a9a9a9; clwebblack = $000000; webcolorscount = 140; {two of which are duplicates aqua/Cyan fuchsia/magenta}