怎样得到 form 颜色的r,g,b值?

Question

不明白，是不是，form的color属性？ 还是你没说清楚？

Answer 1

把Color分解一下不就行了嘛！

Answer 2

GetRColor
GetGColor
GetBColor

Answer 3

function GetRColor(const color: TColor): Byte;
begin
  Result := Color and $FF;
end;function GetGColor(const color: TColor): Byte;
begin
  Result := hi(Color and $FF00);
end;function GetBColor(const color: TColor): Byte;
begin
  Result := hiword(Color and $FF0000);
end;

Answer 4

To Kingron(ＷｉｎＡＰＩ)
Windows有现成的API呀，就不用自己写了吧另外，对于一些系统规定的颜色，可以用ColorToRGB取得当前的RGB值