Пост на основе этой темы.

В настройках персонализации есть настройки экрана, которые позволяют управлять отображением рабочего стола на одном и более экранах, одновременно.

Как же управлять этим программно?

Начиная с ОС Windows 7 есть специальная системная утилита: displayswitch.exe живет в %SystemRoot%\System32\ папке.

Принимает параметры:

1. /internal — Отображать рабочий стол только на основном мониторе
2. /clone — Отображать рабочий стол на всех мониторах (клонирование)
3. /extend — Расширить рабочий стол на кол-во мониторов (Имея 2 монитора, 50% рабочего стола будет отображена на 1, остальные 50% на втором).
4. /external — Отображать рабочий стол только на втором мониторе (Основной будет выключен)

Пример использования в Delphi:

//Добавить в uses модули ShellAPI,SysUtils,Windows
var
sDir:string; //Рабочая папка приложения displayswitch.exe
begin
sDir:=IncludeTrailingPathDelimiter(GetEnvironmentVariable('SYSTEMROOT')) + 'System32\';
ShellExecute(0,PChar('Open'),PChar(sDir+'displayswitch.exe'),PChar(' /extend'),PChar(sDir),SW_HIDE);
end;


Данный пример, скрытно, переключает рабочий стол в режим расширенного отображения на всех подключенных экранах.

Спасибо: doktor255

(читать всё…)