如何以编程方式设置自定义TAlphaColor？

Question

这基本上是我以colors编程方式归属的方式Delphi

label.FontColor      := TAlphaColors.Yellow;

如果我想要一个自定义颜色#FF1C90EF怎么办？

如何以编程方式设置它？

Answer 1

与TColorVCL 类似,TAlphaColor只是一个整数(好吧,Cardinal无论如何),所以你可以直接输入你的十六进制值:

label.FontColor := TAlphaColor($FF1C90EF);

Embarcadero的DocWiki记录了这种行为:

System.UITypes.TAlphaColor

设置颜色有三种方法:

• 使用System.UIConsts中的预定义常量:

  Color := claGreen; //Delphi
  Color = TAlphaColor(claGreen); // C++
  

• 使用TAlphaColorRec中的预定义常量:

  Color := TAlphaColorRec.Green; //Delphi
  Color = TAlphaColor(TAlphaColorRec::Green); // C++
  

• 使用4字节十六进制数字表示:

  Color := $FF008000;  // Delphi
  Color = TAlphaColor(0xFF008000); // C++
  

您还可以使用TAlphaColorRec记录分配各个组件:

var
  rec: TAlphaColorRec;
begin
  rec.A := $FF;
  rec.R := $1C;
  rec.G := $90;
  rec.B := $EF;
  label.FontColor := rec.Color;
end;

Answer 2

看起来您可以将颜色传递给新的实例 TAlphaColor

例如，TAlphaColor($FF1C90EF)。

话虽如此，您也可以直接设置.FontColor属性，而无需创建TAlphaColor.