Имя: Пароль:
1C
1С v8
как программно установить размер формы во весь экран 8.2
0 GANR
 
15.07.11
10:50
СсылкаНаДокумент - ссылка на документ во ВНЕШНЕЙ информационной базе (V82.Application). Его форма открывается - всё нормально. Но почему-то не устанавливается её размер во весь экран.

   ФормаВнешнегоОбъекта    =    СсылкаНаДокумент.ПолучитьФорму();
   
   ФормаВнешнегоОбъекта.Width = ScreenWidth;
   ФормаВнешнегоОбъекта.Height = ScreenHeight;
       
   ФормаВнешнегоОбъекта.ОткрытьМодально();

ScreenWidth и ScreenHeight - размеры монитора, полученные ранее так:

   //С сайта http://www.nastroy-ka.ru/system1c/11--1.html
   ИмяКомпьютера = ".";
   ServiceSet = ПолучитьCOMОбъект("winmgmts:{impersonationLevel=impersonate}!\\" + ИмяКомпьютера + "\root\cimv2");
   ParametersSystem = ServiceSet.ExecQuery("select ScreenWidth, ScreenHeight from Win32_DesktopMonitor");
   Для Каждого Item Из ParametersSystem Цикл
       ScreenWidth        =    Item.ScreenWidth;
       ScreenHeight    =    Item.ScreenHeight;
   КонецЦикла;
1 GANR
 
15.07.11
11:03
Вот. Нашел Способ:
ФормаВнешнегоОбъекта.WindowAppearanceMode = СоединениеСБазой.WindowAppearanceModeVariant.Maximized;
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан