Имя: Пароль:
1C
 
1С. Как окно развернуть на весь экран ?
Ø
0 Vacony
 
16.05.05
18:01
Помню была темка. не могу найти.
 Надо при открытиии открыватьна весь экран обработку ?
1 КонецЦикла
 
16.05.05
18:06
2 Vacony
 
16.05.05
18:06
может через WshShell.SendKeys , но какая комбинация для развертывания окна ? :)
3 kurilkin
 
16.05.05
18:06
4 smaharbA
 
16.05.05
18:08
Придется во всех формах
глПриОткрытииФормы(); КонецПроцедуры // ПриОткрытии
Функция глПриОткрытииФормы() Экспорт
  Если глРазворачиватьФормы=1 Тогда
    глМаксимизироватьОкно();
  КонецЕсли;
  Если глЗакрыватьСообщения=1 Тогда
    глЗакрытьОкноСообщений();
  КонецЕсли;
КонецФункции // глПриОткрытииФормы()
Функция глЗакрытьОкноСообщений() Экспорт
  Попытка
    wshShell=СоздатьОбъект("wScript.shell");
    wshShell.appActivate(ЗаголовокСистемы());
    wshShell.sendKeys("^+(z)");
    //wshShell.sendKeys("^+(Z)");
  //Wait(1);
    wshShell.sendKeys("^+(я)"); //разрешение проблемы с раскладкой
  wshShell.appActivate(ЗаголовокСистемы());
    Возврат 1;
  Исключение
    Возврат 0;
  КонецПопытки;
КонецФункции
Функция глМаксимизироватьОкно() Экспорт
  // вызывать в конце процедуры "ПриОткрытии" из модуля формы
  Попытка
      WSHShell = СоздатьОбъект("WScript.Shell");
  wshShell.appActivate(ЗаголовокСистемы());
      WSHShell.SendKeys("%");
      WSHShell.SendKeys("{LEFT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}");
  //Wait(1);
  wshShell.appActivate(ЗаголовокСистемы());
      Возврат 1;
  Исключение
      Возврат 0;
  КонецПопытки;
КонецФункции
5 Vacony
 
16.05.05
18:08
1,3 - о.. супер :) хотя изврат.. типа двигаем курсор... А если в меню окна вставлен лишний пункт ? (всякими примочками к виндам) ?
6 Vacony
 
16.05.05
18:12
wshShell.appActivate(ЗаголовокСистемы())
 это для активации окна 1С ? а зчем ? оно разве фокус теряет при максимизации окна ?
7 smaharbA
 
16.05.05
18:14
бывает теряет при {ENTER}
8 smaharbA
 
16.05.05
18:19
+(7) да и вообще привычка (на всякий случай), только лучче так
заг="1С:Предприятие - "+Метаданные.Идентификатор+": "+ЗаголовокСистемы();
wshShell.appActivate(Заг);
Ну или чтото в этом роде
Программист всегда исправляет последнюю ошибку.