本文整理自网络,侵删。
//转换 TColor 到 HTML 颜色串 function ColorToHtml(color:TColor):string;var RgbColor : TColorRef;begin RgbColor := ColorToRGB(color); Result:=Format('#%.2x%.2x%.2x',[GetRValue(RgbColor),GetGValue(RgbColor),GetBValue(RgbColor)]);end;
相关阅读 >>
Delphi speedbutton按钮动态加载图片(从image和imagelist)
Delphi源码webbrowser多次执行documentcomplete
更多相关阅读请进入《Delphi》频道 >>