Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.04.26;
Скачать: CL | DM;

Вниз

Вывод на второй дисплей   Найти похожие ветки 

 
Boom boom box   (2009-02-24 12:52) [0]

Есть приложение, которое работает развернутым на весь экран (без бордеров, заголовков и так далее). Перетащить его, соответственно, невозможно (и не нужно допускать эту возможность).

При заданных настройках как суметь разворачиваться при старте на втором (secondary) мониторе, если к видеокарте подключено 2 монитора?


 
Ega23 ©   (2009-02-24 13:07) [1]

смотри в сторону Screen.MonitorCount, Screen.Monitors[i] и Tform.MakeFullyVisible


 
Boom boom box   (2009-02-24 13:17) [2]

Сори, забыл упомянуть, что программа работает на отдельном десктопе.
В теле главной функции аля:

thisdesktop := GetThreadDesktop(GetCurrentThreadId);
Application.Free;
NewDesktop := CreateDesktop( "BLABLA", nil, nil, 0,
   GENERIC_ALL, nil );
SetThreadDesktop( NewDesktop );
Application := TApplication.Create(nil);
SwitchDesktop( NewDesktop );


возможно, это как-то повиляет на варианты ответов.



Страницы: 1 вся ветка

Текущий архив: 2009.04.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
15-1235553818
DVM
2009-02-25 12:23
2009.04.26
Работа программиста - это сон?!


2-1236507266
Tany
2009-03-08 13:14
2009.04.26
double формат в DBGrid


2-1237121432
AIK
2009-03-15 15:50
2009.04.26
Теряется путь от исполняемой папки


15-1235651214
Ega23
2009-02-26 15:26
2009.04.26
Подскажите, как понять


2-1236634530
Дмитрий Белькевич
2009-03-10 00:35
2009.04.26
Как правильнее закрывать приложение? App.Terminate или Close