Главная страница
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.01 c
15-1234684978
Marser
2009-02-15 11:02
2009.04.26
КПК Asus MyPal A696


3-1220117523
mefodiy
2008-08-30 21:32
2009.04.26
Ошибка в триггере MySQL


8-1193571359
hahol_64_rus
2007-10-28 14:35
2009.04.26
курсор мыхи


2-1236670123
vat
2009-03-10 10:28
2009.04.26
как заставить OpenDialog выделять папку


2-1236703187
AlexDan
2009-03-10 19:39
2009.04.26
Реал и матем. функции.