在自己的软件中经常需要得知运行本软件的系统支持的颜色数。例如有的软件在16Bits的颜色数的计算机上开发而成，程序的颜色调试得非常漂亮，但是到了一台只支持16色的计算机上，程序变得非常难看。这就需要得到系统的颜色数。
Delphi中如何取得系统的颜色数呢？下面的程序就解决这个问题。
function GetSysColorNum:Integer;
Var
ScreenDc:HDC;
NumBitsPixel:Integer;
begin
Result:=0;
ScreenDc:=GetDC(0);
http://www.gaodaima.com/?p=65978Delphi中如何取得系统支持的颜色数_Delphi
NumBitsPixel:=GetDeviceCaps(ScreenDc,BITPIXEL);
ReleaseDC(ScreenDC);
Result:=1 shl NumBitsPixel;
End;
欢迎大家阅读《Delphi中如何取得系统支持的颜色数_Delphi》,跪求各位点评,若觉得好的话请收藏本文，by 搞代码
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：Delphi中如何取得系统支持的颜色数_Delphi
转载请注明原文链接：Delphi中如何取得系统支持的颜色数_Delphi
