원격 관리 프로그램을 만드는중에 시스템의 현재 컬러의 Bit값을 알아내야 했다..
이리 저리 알아 보다가  DC를 얻어내서 GetDeviceCaps로 알아 낼수 있는 방법을 찾아 냈다.

function GetScreenColorBit : Integer;
var
  DC : HDC;
begin
  DC := GetDC( GetDesktopWindow );
  Result := GetDeviceCaps( DC, BITSPIXEL );
  ReleaseDC( GetDesktopWindow, DC )
end;

잊어 먹지 않기를 바라면서 ..