\u8fd9\u6bb5\u4ee3\u7801\u652f\u6301\u7684Web\u989c\u8272\u683c\u5f0f\u4e3a #RRGGBB\/#RGB \u4ee5\u53ca\u4ee5Web\u6807\u51c6\u540d\u79f0\u547d\u540d\u7684\u989c\u8272\uff08\u9700\u8981\u5f15\u7528\u5355\u5143\uff1aqstring,graphutil\uff09\uff1a<\/p>\n
function ParseWebColor(S: String;ADefColor:TColor=clBlack): TColor;\r\nvar\r\n p: PChar;\r\n c: array [0 .. 3] of Byte absolute Result;\r\n i: Integer;\r\nbegin\r\n Result := 0;\r\n p := PChar(S);\r\n i := 0;\r\n if p^ in ['a' .. 'z', 'A' .. 'Z'] then\r\n begin\r\n if IdentToColor('cl' + S, i) then\r\n Result := i\r\n else\r\n begin\r\n S := 'clWeb' + S;\r\n for I := 0 to High(WebNamedColors) do\r\n begin\r\n if CompareText(WebNamedColors[I].Name, S) = 0 then\r\n begin\r\n Result := WebNamedColors[I].Value;\r\n Exit;\r\n end;\r\n end;\r\n Result := ADefColor;\r\n end;\r\n Exit;\r\n end\r\n else if p^ = '#' then\r\n begin\r\n Inc(p);\r\n if Length(S) = 4 then \/\/ #RGB\r\n begin\r\n while p^ <> #0 do\r\n begin\r\n if IsHexChar(p^) then\r\n begin\r\n c[i] := (HexValue(p^) * 255) div 15;\r\n Inc(i);\r\n Inc(p);\r\n end\r\n else\r\n break;\r\n end;\r\n end\r\n else if Length(S) = 7 then\r\n begin\r\n while p^ <> #0 do\r\n begin\r\n if IsHexChar(p^) then\r\n begin\r\n c[i] := HexValue(p^);\r\n Inc(p);\r\n if p^ <> #0 then\r\n begin\r\n c[i] := (c[i] shl 4) + HexValue(p^);\r\n Inc(p);\r\n end;\r\n Inc(i);\r\n end\r\n else\r\n break;\r\n end;\r\n end;\r\n end;\r\n if i <> 3 then\r\n Result := ADefColor;\r\nend;<\/pre>\n\u6bd4\u5982#FF0000 \u548c #F00 \u90fd\u88ab\u89e3\u91ca\u4e3a\u7ea2\u8272\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"
\u8fd9\u6bb5\u4ee3\u7801\u652f\u6301\u7684Web\u989c\u8272\u683c\u5f0f\u4e3a #RRG […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[69,8,603],"tags":[],"class_list":["post-4747","post","type-post","status-publish","format-standard","hentry","category-c-builder","category-delphi","category-603"],"views":2549,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4747","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=4747"}],"version-history":[{"count":2,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4747\/revisions"}],"predecessor-version":[{"id":4749,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/4747\/revisions\/4749"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=4747"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=4747"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=4747"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}