From c7394db122ad9ecf58fb3f7c76b25c7157ad5dd8 Mon Sep 17 00:00:00 2001 From: Alexander Medvedko Date: Thu, 5 May 2022 09:15:27 +0300 Subject: [PATCH] =?UTF-8?q?=D0=A0=D0=B5=D0=B0=D0=BB=D0=B8=D0=B7=D0=BE?= =?UTF-8?q?=D0=B2=D0=B0=D0=BD=20=D0=BC=D1=8F=D0=B3=D0=BA=D0=B8=D0=B9=20?= =?UTF-8?q?=D0=BC=D0=B5=D1=85=D0=B0=D0=BD=D0=B8=D0=B7=D0=BC=20=D0=B7=D0=B0?= =?UTF-8?q?=D0=BA=D1=80=D1=8B=D1=82=D0=B8=D1=8F=20=D1=82=D0=B5=D1=81=D1=82?= =?UTF-8?q?-=D0=BA=D0=BB=D0=B8=D0=B5=D0=BD=D1=82=D0=BE=D0=B2?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Ext/Form/Module.bsl" | 34 +++++++++++++------ 1 file changed, 24 insertions(+), 10 deletions(-) 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", КодВозврата, Порт)); + Иначе + КонтекстЯдра.Отладка(" - После запуска команды завершения тест-клиента. Порт " + Порт); + КонецЕсли; + КонецПопытки; КонецЕсли; КонецЦикла;