Delphi中如何取得系统的颜色数呢?下面的程序就解决这个问题。
function GetSysColorNum:Integer;
Var
ScreenDc:HDC;
NumBitsPixel:Integer;
begin
Result:=0;
ScreenDc:=GetDC(0);
NumBitsPixel:=GetDeviceCaps(ScreenDc,BITPIXEL);
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/
发布: 2008-5-16 10:12 | 作者: 不详 | 来源: ccid | 查看: 49次 | 进入软件测试论坛讨论
文章来源于领测软件测试网 https://www.ltesting.net/