Número de cores aceitas pelo monitor
O código abaixo apresenta a implementação de uma função que retorna o número de cores suportadas pelo monitor.
Esta função baseia-se na utilização de uma API do Windows, chamada GETDC.:
Function QtdeCores : 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;
Para executar esta função coloque um objeto edit e um objeto button, no evento onclick do botão insira o seguinte código:
edit1.text:= inttostr(Qtdecores);
Ao clicar no botão o objeto edit recebe a quantidade de cores que o monitor está suportando.
