Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Глубина цвета   Найти похожие ветки 

 
Artemiy   (2005-09-06 18:51) [0]

Здравствуйте!
Как определить текущую глубину цвета экрана (16, 24, 32 бита)?
Спасибо!


 
begin...end ©   (2005-09-06 19:11) [1]

GetDeviceCaps ?


 
Турист   (2005-09-06 22:21) [2]

>Artemiy   (06.09.05 18:51)  



function GetColorCount : Int64;
{$WRITEABLECONST ON}
const
 ColorCount : Int64 = 0;
var
 DC : HDC;
begin
 if ColorCount = 0 then begin
   DC := GetDC(0);
   if DC <> 0 then try
     ColorCount := Int64(1) shl (GetDeviceCaps(DC, PLANES) * GetDeviceCaps(DC, BITSPIXEL));
   finally
     ReleaseDC(0, DC)
   end else
     ColorCount := 256
 end;
 Result := ColorCount
end;


 
Artemiy   (2005-09-06 22:51) [3]

Спасибо, то что надо!


 
Artemiy   (2005-09-06 22:59) [4]

Вот ещё появились вопрос, надеюсь простой! Как отследить изменение видеорежима рабочего стола?
Спасибо!


 
Турист   (2005-09-06 23:22) [5]

Посылается сообщение WM_DISPLAYCHANGE


 
Artemiy   (2005-09-07 00:02) [6]

Сенкс!



Страницы: 1 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.109 c
2-1129119784
Del_programmer
2005-10-12 16:23
2005.11.06
Динамика


2-1128972479
Zut
2005-10-10 23:27
2005.11.06
получение данных из Access


2-1129314119
chij
2005-10-14 22:21
2005.11.06
DBgrid


8-1118403597
Dwarfer
2005-06-10 15:39
2005.11.06
NCTVideoStudio ActiveX DLLs


2-1129266306
Arkady
2005-10-14 09:05
2005.11.06
Вычисляемое поле