如何：确定颜色数

最新推荐文章于 2021-07-14 09:03:51 发布

cxygs5788

最新推荐文章于 2021-07-14 09:03:51 发布

阅读量123

点赞数

可以使用GetDeviceCaps API调用此简单函数来确定显示器的颜色“深度”。

Private Declare Function GetDeviceCaps Lib "GDI32" (ByVal hDC As Long, ByVal nIndex As Long) As Long 
Function DeviceColors(hDC As Long) As Single
  Const PLANES = 14
  Const BITSPIXEL = 12
  DeviceColors = 2 ^ (GetDeviceCaps(hDC, PLANES) * GetDeviceCaps(hDC, BITSPIXEL))
End Function

要使用此功能，只需将当前表单的hDC传递给它即可。

返回一些典型值...

4,294,967,296 =“真彩色”（32位）

65,536 =“高色”（16位）

From: https://bytes.com/topic/visual-basic/insights/671721-how-determine-number-colours