VPF::Смена разрешения на 2 и более мониторах

Ashkana

Дата 11.11.2010, 13:44 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 11.11.2010

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

О смене разрешения написано много, однако везде разрешение меняется на единственном мониторе.
Возникла задача менять разрешение на 2 и более мониторах.

Код


Var
SDF: String;
dm : TDEVMODE;
ret: integer;

      begin
      SDF:=Edit1.Text; \\ Edit1.Text - \\.\DISPLAY1 или \\.\DISPLAY2 или \\.\DISPLAY3
      ZeroMemory(@dm, sizeof(DEVMODE));
      dm.dmSize := sizeof(DEVMODE);
      dm.dmBitsPerPel := 16;
      dm.dmPelsWidth := 800; 
      dm.dmPelsHeight := 600;         
      dm.dmDisplayFrequency := 60;
      dm.dmFields :=DM_BITSPERPEL or DM_PELSWIDTH or DM_PELSHEIGHT or DM_DISPLAYFREQUENCY or DM_DISPLAYFLAGS or DM_POSITION;    

      ret:=ChangeDisplaySettingsEx(Pchar(SDF), dm, 0,  CDS_UPDATEREGISTRY or CDS_NORESET , 0); 
      // ret возвращает 0     
      ChangeDisplaySettingsEx('', PDeviceMode(nil)^, 0, StrToInt('0x40'), nil); 
     end;

Код должен работать и не работает. Разрешение не меняется.
Почему ?
Спасибо.

ama_kid

Дата 11.11.2010, 16:21 (ссылка)

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

Загрузка ...

АСУТП-кодер

Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

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

Взял исходник отсюда, доработал напильником для своей двухмониторной системы (особо не вникал в суть, правда), проверил - вроде работает - на обоих монитора независимо выставляет разрешения. Забирай в аттаче и сравнивай что не так с твоим вариантом.

Присоединённый файл ( Кол-во скачиваний: 11 )

ResolutionSrc.rar 5,36 Kb

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

самурай без меча подобен самураю с мечом, но только без меча

Ashkana

Дата 13.11.2010, 17:27 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 11.11.2010

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

Цитата(ama_kid @ 11.11.2010, 16:21)

Спасибо БОЛЬШОЕ. Работает.
Отличие от того примера который был в том , что указывается номер режима , не а разрешение.
Было:

Код



      dm.dmBitsPerPel := 16;
      dm.dmPelsWidth := 1024;  
      dm.dmPelsHeight := 768;

Есть только один вопрос - если 2 дисплей не активен - не стоит галка в свойствах экрана "Расширить рабочий стол на этот монитор",
то разрешение меняется - ChangeDisplaySettingsEx возвращает DISP_CHANGE_SUCCESSFUL, но экран не загорается.
Для того чтобы он стал активен необходимо изменить флаг DISPLAY_DEVICE_ATTACHED_TO_DESKTOP .
Как изменить не могу понять ?

Спасибо.

Ashkana

Дата 13.11.2010, 17:42 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 11.11.2010

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

Вопрос не праздный.
Есть такая ситуация многократно описанная пользователями и не имеющая решения на сегодняшний день.
Существуют видеокарты ATI 5700 и 5800 серии позволяющие подключить три (!) монитора к одной видеокарте , два по DVI и еще один по DisplayPort .
При использовании существует одна особенность - после полного выключения питания ( перезагрузка не влияет ) при включении система отключает первые 2 монитора подключенные по DVI и выставляет на 3 мониторе не первичное разрешение. Т.е. при каждом включении питания ОС видит монитор подключенный по DisplayPort как "в первый раз". Приходится активизировать в свойствах экрана первые два монитора, выставлять первичное разрешение на мониторе подключенном по DisplayPort и заново расставлять значки на трех мониторах. Компьютер используется художником, поэтому 3 монитора не роскошь в данном случае.

Спасибо.

ama_kid

Дата 13.11.2010, 18:18 (ссылка)

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

Загрузка ...

АСУТП-кодер

Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

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

Ashkana, к сожалению, я буду на работе, где у меня двухмониторная система, только в понедельник. Пока на вскидку нагуглил только такой топик с активным обсуждением. Там пробуют разные варианты с переменным успехом. Попробуй пройти по их стопам, если не поможет - на следующей неделе попробуем что-нибудь еще.

Это сообщение отредактировал(а) ama_kid - 13.11.2010, 18:19

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

самурай без меча подобен самураю с мечом, но только без меча

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