(page requirements)

Can your video handle 16, 256, 32768, 16777216, or more colors?

You can use WIN API function GetDeviceCaps() to calculate the number of colors supported by the current video mode. To make it even easier to use, here's a function that will simply return the number of maximum simultaneous colors current video device can handle:

function GetColorsCount : integer;
var
  h : hDC;
begin
  Result := 0;
  try
    h      := GetDC( 0 );
    Result :=
      1 shl
      (
        GetDeviceCaps( h, PLANES ) *
        GetDeviceCaps( h, BITSPIXEL )
      );
  finally
    ReleaseDC( 0, h );
  end;
end;

 
 
Applicable Keywords : Delphi, Delphi 2.x, Functions, User Interface, Win32
 
 
 
Copyright © 2009 Chami.com. All Rights Reserved. | Advertise | Created in HTML Kit editor