how to get color depth

[Stefan5627]

How can i get the colordepth of a system (32-bit, 24-bit, 16-bit or even only 256 colors)
I've looked in sysmetric and sys functions but couldn't find it

can anyone help me?

tia,

Stefan

 

[Mike Gagnon]

Stefan5627

LOCAL liGetDC, liDCHandle, liPlanes, liBitsPixel, liNumColors, ;
  liStandardPlanes, liStandardBitsPixel, piDCHandle, piNumColors
DECLARE INTEGER GetDC IN WIN32API INTEGER liGetDC
liDCHandle = GetDC(0)
liStandardPlanes = 14
liStandardBitsPixel= 12
DECLARE INTEGER GetDeviceCaps IN WIN32API ;
  INTEGER piDCHandle, INTEGER piNumColors
liPlanes = GetDeviceCaps(liDCHandle, liStandardPlanes)
liBitsPixel = GetDeviceCaps(liDCHandle, liStandardBitsPixel)
liNumColors = 2^(liPlanes * liBitsPixel)
DECLARE INTEGER ReleaseDC IN WIN32API ;
  INTEGER piHandle, INTEGER piDCHandle
ReleaseDC(0, liDCHandle)
messagebox(TRANSFORM(liNumColors)+ " number of colors")

Mike Gagnon

If you want to get the best response to a question, please check out FAQ184-2483 first.

 

[Stefan5627]

Thanks Mike, works great
Maybe make it a faq?