Главная страница
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.009 c
6-1200754867
guard_gg
2008-01-19 18:01
2009.04.26
icmp result после udp send


4-1208862881
kalexi
2008-04-22 15:14
2009.04.26
Проблема с SetLayeredWindowAttributes


2-1236771470
dplz
2009-03-11 14:37
2009.04.26
Связанные переменные во всех формах


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


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