Главная страница
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.12 c
4-1125689808
Grief
2005-09-02 23:36
2005.11.06
Scanline в WinAPI


6-1121928283
Drema
2005-07-21 10:44
2005.11.06
Что я делаю не так (Indy и IDHTTP)?


1-1129130135
DelphiLexx
2005-10-12 19:15
2005.11.06
Экспорт TChart в Word


14-1129586099
beglec
2005-10-18 01:54
2005.11.06
www.delphimaster.ru - лучший способ поднять настроение.


2-1129392436
Nicolas1989
2005-10-15 20:07
2005.11.06
Работа с COM портом