Delphi转换 TColor 到 HTML 颜色串

本文整理自网络，侵删。

 
//转换 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 使用管道进程间通讯

Delphi fmx 截图

Delphi 查询当前进程的内存使用大小

Delphi百度地图经纬度与地址互转

Delphi antiemupeb

建议大家使用fastmm

Delphi 制作放两个小图片的按钮

Delphi comobj调用wmplayer播放音乐

Delphi 程序动态改变皮肤

Delphi 10.3 开发app 在android手机上获取imei

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi转换 TColor 到 HTML 颜色串