Главная страница
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.027 c
6-1122019736
Senti
2005-07-22 12:08
2005.11.06
Помогите разобраться с вот этим кодом...


3-1127563236
ZSergey
2005-09-24 16:00
2005.11.06
Как получить значение поля ...


5-1107521160
Alex01
2005-02-04 15:46
2005.11.06
Edit


1-1129723022
apellido
2005-10-19 15:57
2005.11.06
Как ограничить кол-во символов в TEdit для пропорц. шрифтов


1-1129052350
SergProger
2005-10-11 21:39
2005.11.06
Типы файлов. Иконка файла.