Число цветов (цветовая палитра) у данного компьютера Эта функция возвращает число бит на точку у данного компьютера. Так, например, 8 - 256 цветов, 4 - 16 цветов ...function GetDisplayColors : integer;var tHDC : hdc;begin tHDC:=GetDC(0); result:=GetDeviceCaps(tHDC, 12)* GetDeviceCaps(tHDC, 14); ReleaseDC(0, tHDC);end; Copyright © "Мастера DELPHI" E-mail: delphi@mastak.com http://www.delphimaster.ru Источник получения информации: http://www.delphimaster.ru
function GetDisplayColors : integer;var tHDC : hdc;begin tHDC:=GetDC(0); result:=GetDeviceCaps(tHDC, 12)* GetDeviceCaps(tHDC, 14); ReleaseDC(0, tHDC);end;