Главная страница
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.046 c
2-1129024587
Dude
2005-10-11 13:56
2005.11.06
Excel и Delphi


2-1129240693
Lordalexander
2005-10-14 01:58
2005.11.06
Мышь


14-1129719369
Иг_Иг
2005-10-19 14:56
2005.11.06
Свернуть все окна !


2-1129364731
Vital
2005-10-15 12:25
2005.11.06
не используя OnPaint


1-1129545468
DeStranger
2005-10-17 14:37
2005.11.06
Модальное окно теряет фокус