Число цветов (цветовая палитра) у данного компьютера

Previous  Top  Next

    
 

 

Эта функция возвращает число бит на точку у данного компьютера. Так, например, 8 - 256 цветов, 4 - 16 цветов ...

 

Code:

function GetDisplayColors : integer;

var tHDC  : hdc;

begin

tHDC:=GetDC(0);

result:=GetDeviceCaps(tHDC, 12)* GetDeviceCaps(tHDC, 14);

ReleaseDC(0, tHDC);

end;

 

 

 

Зайцев О.В.

Владимиров А.М.

©Drkb::03687

Взято из http://forum.sources.ru

 

 


Code:

1 shl GetDeviceCaps( Canvas.Handle, BITSPIXEL );

 

 

 

©Drkb::03688

       

Взято с http://delphiworld.narod.ru