VPF::Включение и отключение второго монитора

zhefran

Дата 19.10.2009, 12:29 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 237
Регистрация: 27.9.2007
Где: Винница-Киев-Ирпе нь-?, Украина

Репутация: нет
Всего: нет

Суть такая:
Мне необходимо по кнопке в моем приложении включать или отключать отображение на втором мониторе, плазме, проекторе.
Можно ли как-то управлять режимами 1 монитор или 2, клонирование или растягивание изображения на два монитора?
Что посоветуете?

--------------------

Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!

dumb

Дата 21.10.2009, 02:36 (ссылка)

(нет голосов)

Загрузка ...

sceloglauxalbifacies

Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 7
Всего: 158

лепил на коленке запускалку медиапортала, вот кусок(немного упрощенный и на BCB smile

), включающий второй монитор(TV) в режиме "растягивания":

Код


      DEVMODE dm;
      ZeroMemory(&dm, sizeof(DEVMODE));
      dm.dmSize = sizeof(DEVMODE);
      dm.dmBitsPerPel = 32;
      dm.dmPelsWidth = 1920; // 0 - для выключения монитора
      dm.dmPelsHeight = 1080; // 0 - для выключения монитора
      dm.dmPosition.x = 1600; // x-позиция второго монитора = ширина первого монитора
      dm.dmPosition.y = 0;
      dm.dmDisplayFlags = 4;//=DM_INTERLACED; // 1080i для совместимости со вторым телевизором
      dm.dmDisplayFrequency = 30;
      dm.dmFields=DM_BITSPERPEL|DM_PELSWIDTH|DM_PELSHEIGHT|DM_DISPLAYFREQUENCY|DM_DISPLAYFLAGS| DM_POSITION;
      // 0x40 - подсмотрено в апплете свойств экрана, но описания оного значения нигде не нашел
      // видимо, флаг для кэширования изменений и подтверждения по вызову с нулями
      ret = ChangeDisplaySettingsEx("\\\\.\\DISPLAY2", &dm, 0, 0x40|CDS_TEST, 0); // в дельфях - '\\.\DISPLAY2'
      if (ret == DISP_CHANGE_SUCCESSFUL)
        ret = ChangeDisplaySettingsEx("\\\\.\\DISPLAY2", &dm, 0, 0x40|CDS_NORESET|CDS_UPDATEREGISTRY, 0);
      // подтверждаем изменения
      ChangeDisplaySettingsEx(0, 0, 0, 0x40, 0);

насчет "клона" не знаю, возможно задается одним из флагов в dmDisplayFlags.

zhefran

Дата 21.10.2009, 12:46 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Цитата

насчет "клона" не знаю, возможно задается одним из флагов в dmDisplayFlags.

Относительно dmDisplayFlags нашел в MSDN

Цитата

dmDisplayFlags
    For displays, specifies a display device's display mode. This member can be one of the following values:

    DM_GRAYSCALE
        Specifies that the display is not a color device. If this flag is not set, color is assumed.
    DM_INTERLACED
        Specifies that the display mode is interlaced. If the flag is not set, noninterlaced is assumed.

    This member is not used for printers.

Какая аналогия dmPosition в Delphi или какой модуль нужно подключить!

добавление:

Моя задача сводиться к включению или отключению режима клонирования - переход с программы в режим клонирования или в режим один дисплей.
Кто-то сталкивался с таким?

Это сообщение отредактировал(а) zhefran - 21.10.2009, 13:24

--------------------

Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »