定制德尔福颜色

che*_*sen 14 delphi colors delphi-7

如果我想将颜色属性设置为非标准的(即不是clBlack或clRed),我该怎么做?我可以设置像十六进制颜色的东西吗?

Jam*_*ass 15

Windows.pas中的RGB

function RGB(r, g, b: Byte): COLORREF;
Run Code Online (Sandbox Code Playgroud)

你可以将结果转换为TColor.

例如

MyColour := TColor(RGB(Red,Green,Blue));
Run Code Online (Sandbox Code Playgroud)


Sim*_*aWB 10

你可以使用$ 00BBGGRR

BB =蓝色
GG =绿色
RR =红色

所有这些值都可以在0到255之间($ 00和$ FF)

  • @Asped:不,对于普通颜色,DWORD中的最高字节应为0.但也许你正在使用alpha通道的颜色?如果是这样,$ FF可能是完全不透明的.但是在Win32 GDI中通常不使用alpha. (2认同)