Dicas - Cores suportados pelo monitor

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (0)  (0)

A dica apresenta o código para implementação de uma função que retorne o número de cores suportadas pelo monitor.

Número de Cores Suportados Pelo Seu Monitor

 

A dica abaixo apresenta o código para implementação de uma função que retorne o número de cores suportadas pelo monitor. A função se baseia na utilização de uma API do Windows, chamada GETDC. Veja a função:

 

function QdeCores: 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 testar a função coloque um objeto button e um objeto edit. No evento onclick do objeto button coloqueo seguinte código:

 

Edit1.Text := IntToStr(Qdecores);

 

Ao clicar no botão, o Edit recebe o número de cores que o monitor está suportando.

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Receba nossas novidades
Ficou com alguma dúvida?