Delphi FAQ - Как узнать кол-во цветов цветовой палитры?

Written on . Posted in Delphi

ОГЛАВЛЕНИЕ

Страница 70 из 86

Как узнать кол-во цветов цветовой палитры?

function GetColorsCount : DWord;
 var
   DC : HDC;
 begin
   DC := GetDC( 0 );
   Win32Check(DC <> 0);
   Result :=1 shl (GetDeviceCaps(DC, PLANES) *
                   GetDeviceCaps(DC, BITSPIXEL));
   ReleaseDC( 0, DC );
 end;

Leonid Troyanovsky <Адрес электронной почты защищен от спам-ботов. Для просмотра адреса в вашем браузере должен быть включен Javascript.>


форум delphi