diff --git "a/plugins/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" "b/plugins/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" index 3e8ace47f..1bec39f80 100644 --- "a/plugins/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" +++ "b/plugins/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/\320\242\320\265\321\201\321\202\320\232\320\273\320\270\320\265\320\275\321\202\321\213/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" @@ -279,16 +279,30 @@ Если ЭтоLinux() Тогда ЗапуститьПриложение("kill -9 `ps aux | grep -ie TESTCLIENT | grep -ie 1cv8c | awk '{print $2}'`"); Иначе - ТекстСкрипта = ТекстСкриптаЗавершитьТестКлиент(Порт); - КонтекстЯдра.Отладка(" - текст скрипта удаления. " + ТекстСкрипта); - - КодВозврата = Неопределено; - ЗапуститьПриложение("cmd /c" + ТекстСкрипта,, Истина, КодВозврата); - Если ЗначениеЗаполнено(КодВозврата) Тогда - КонтекстЯдра.Отладка(СтрШаблон(" - После запуска команды завершения тест-клиента. КодВозврата: %1, Порт %2", КодВозврата, Порт)); - Иначе - КонтекстЯдра.Отладка(" - После запуска команды завершения тест-клиента. Порт " + Порт); - КонецЕсли; + Попытка + КонтекстЯдра.Отладка("Попытка закрытия окон тест-клиента"); + ТекКлиент = ТекЗначение.ТестКлиент; + КонтекстЯдра.Отладка("Подключение к тест-клиенту"); + ТекКлиент.УстановитьСоединение(); + КонтекстЯдра.Отладка("Закрытие окон тест-клиента"); + ОчередноеОкно = ТекКлиент.НайтиОбъект(Тип("ТестируемоеОкноКлиентскогоПриложения")); + Пока ОчередноеОкно <> Неопределено Цикл + ОчередноеОкно.Закрыть(); + ОчередноеОкно = ТекКлиент.НайтиОбъект(Тип("ТестируемоеОкноКлиентскогоПриложения")); + КонецЦикла; + Исключение + КонтекстЯдра.Отладка("Ошибка закрытия тест-клиента:" + ОписаниеОшибки()); + КонтекстЯдра.Отладка("Принудительное закрытие тест-клиента"); + ТекстСкрипта = ТекстСкриптаЗавершитьТестКлиент(Порт); + КонтекстЯдра.Отладка(" - текст скрипта удаления. " + ТекстСкрипта); + КодВозврата = Неопределено; + ЗапуститьПриложение("cmd /c" + ТекстСкрипта,, Истина, КодВозврата); + Если ЗначениеЗаполнено(КодВозврата) Тогда + КонтекстЯдра.Отладка(СтрШаблон(" - После запуска команды завершения тест-клиента. КодВозврата: %1, Порт %2", КодВозврата, Порт)); + Иначе + КонтекстЯдра.Отладка(" - После запуска команды завершения тест-клиента. Порт " + Порт); + КонецЕсли; + КонецПопытки; КонецЕсли; КонецЦикла;