From 61815951597daa9126e759312da454a579262f38 Mon Sep 17 00:00:00 2001 From: alkoleft Date: Mon, 1 May 2023 18:01:53 +0300 Subject: [PATCH] =?UTF-8?q?=D0=A0=D0=B5=D1=84=D0=B0=D0=BA=D1=82=D0=BE?= =?UTF-8?q?=D1=80=D0=B8=D0=BD=D0=B3?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../src/CommonModules/ЮТОбщий/Module.bsl | 84 +------------------ .../src/CommonModules/ЮТОтчет/Module.bsl | 2 +- .../src/CommonModules/ЮТФайлы/Module.bsl | 31 +++++++ .../Forms/СозданиеНастройки/Module.bsl | 2 +- 4 files changed, 34 insertions(+), 85 deletions(-) diff --git a/exts/yaxunit/src/CommonModules/ЮТОбщий/Module.bsl b/exts/yaxunit/src/CommonModules/ЮТОбщий/Module.bsl index 91c4a9df..1d3754e9 100644 --- a/exts/yaxunit/src/CommonModules/ЮТОбщий/Module.bsl +++ b/exts/yaxunit/src/CommonModules/ЮТОбщий/Module.bsl @@ -16,7 +16,7 @@ // //©///////////////////////////////////////////////////////////////////////////©// -#Область ПрограммныйИнтерфейс +#Область СлужебныйПрограммныйИнтерфейс #Область Строки @@ -580,84 +580,6 @@ #КонецОбласти -#Область Файлы - -// Возвращает путь к каталогу, в котором находится файл -// -// Параметры: -// ПолноеИмяФайла - Строка -// -// Возвращаемое значение: -// Строка - Каталог -Функция Каталог(ПолноеИмяФайла) Экспорт - - Файл = Новый Файл(ПолноеИмяФайла); - Возврат Файл.Путь; - -КонецФункции - -// Возвращает путь к вложенному элементу -// -// Параметры: -// Путь1 - Строка - базовый путь к каталогу -// Путь2 - Строка - относительный путь к вложенному элементу -// -// Возвращаемое значение: -// Строка - Объединенный путь -Функция ОбъединитьПути(Путь1, Путь2) Экспорт - - Результат = Неопределено; - - Если ЗначениеЗаполнено(Путь1) И ЗначениеЗаполнено(Путь2) Тогда - Разделитель = ПолучитьРазделительПути(); - - Если НЕ СтрЗаканчиваетсяНа(Путь1, Разделитель) И НЕ СтрНачинаетсяС(Разделитель, Путь2) Тогда - Результат = СтрШаблон("%1%2%3", Путь1, Разделитель, Путь2); - Иначе - Результат = Путь1 + Путь2; - КонецЕсли; - - ИначеЕсли ЗначениеЗаполнено(Путь1) Тогда - Результат = Путь1; - Иначе - Результат = Путь2; - КонецЕсли; - - Возврат Результат; - -КонецФункции - -// Проверяет существование файла -// -// Параметры: -// ПутьКФайлу - Строка -// -// Возвращаемое значение: -// Булево - Файл существует -Функция ФайлСуществует(ПутьКФайлу) Экспорт - - Файл = Новый Файл(ПутьКФайлу); - Возврат Файл.Существует(); - -КонецФункции - -// Проверяет, что по указанному пути находится каталог -// Deprecate -// -// Параметры: -// ПутьКФайлу - Строка -// -// Возвращаемое значение: -// Булево - Это каталог -Функция ЭтоКаталог(ПутьКФайлу) Экспорт - - ВызовУстаревшегоМетода("ЮТОбщий.ЭтоКаталог", "ЮТФайлы.ЭтоКаталог"); - Возврат ЮТФайлы.Существует(ПутьКФайлу) И ЮТФайлы.ЭтоКаталог(ПутьКФайлу); - -КонецФункции - -#КонецОбласти - // МетодМодуляСуществует // Проверяет существование публичного (экспортного) метода у объекта // @@ -846,10 +768,6 @@ КонецФункции -#КонецОбласти - -#Область СлужебныйПрограммныйИнтерфейс - // Описание типов любая ссылка. // // Возвращаемое значение: diff --git a/exts/yaxunit/src/CommonModules/ЮТОтчет/Module.bsl b/exts/yaxunit/src/CommonModules/ЮТОтчет/Module.bsl index ec737eb0..69386569 100644 --- a/exts/yaxunit/src/CommonModules/ЮТОтчет/Module.bsl +++ b/exts/yaxunit/src/CommonModules/ЮТОтчет/Module.bsl @@ -93,7 +93,7 @@ ПутьКОтчету = Параметры.ПараметрыФормирования.ПараметрыЗапуска.reportPath; Если ЭтоКаталог Тогда - ИмяФайла = ЮТОбщий.ОбъединитьПути(ПутьКОтчету, Параметры.ПараметрыФормирования.МодульОтчета.ИмяФайлаПоУмолчанию()); + ИмяФайла = ЮТФайлы.ОбъединитьПути(ПутьКОтчету, Параметры.ПараметрыФормирования.МодульОтчета.ИмяФайлаПоУмолчанию()); Иначе ИмяФайла = ПутьКОтчету; КонецЕсли; diff --git a/exts/yaxunit/src/CommonModules/ЮТФайлы/Module.bsl b/exts/yaxunit/src/CommonModules/ЮТФайлы/Module.bsl index 0a863f88..78372383 100644 --- a/exts/yaxunit/src/CommonModules/ЮТФайлы/Module.bsl +++ b/exts/yaxunit/src/CommonModules/ЮТФайлы/Module.bsl @@ -71,4 +71,35 @@ КонецФункции +// Возвращает путь к вложенному элементу +// +// Параметры: +// Путь1 - Строка - базовый путь к каталогу +// Путь2 - Строка - относительный путь к вложенному элементу +// +// Возвращаемое значение: +// Строка - Объединенный путь +Функция ОбъединитьПути(Путь1, Путь2) Экспорт + + Результат = Неопределено; + + Если ЗначениеЗаполнено(Путь1) И ЗначениеЗаполнено(Путь2) Тогда + Разделитель = ПолучитьРазделительПути(); + + Если НЕ СтрЗаканчиваетсяНа(Путь1, Разделитель) И НЕ СтрНачинаетсяС(Разделитель, Путь2) Тогда + Результат = СтрШаблон("%1%2%3", Путь1, Разделитель, Путь2); + Иначе + Результат = Путь1 + Путь2; + КонецЕсли; + + ИначеЕсли ЗначениеЗаполнено(Путь1) Тогда + Результат = Путь1; + Иначе + Результат = Путь2; + КонецЕсли; + + Возврат Результат; + +КонецФункции + #КонецОбласти diff --git a/exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Module.bsl b/exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Module.bsl index f13dbfc3..f690eaca 100644 --- a/exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Module.bsl +++ b/exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Module.bsl @@ -321,7 +321,7 @@ #Иначе Файл = "1cv8"; #КонецЕсли - ПутьЗапускаемогоКлиента = ЮТОбщий.ОбъединитьПути(КаталогПрограммы(), Файл); + ПутьЗапускаемогоКлиента = ЮТФайлы.ОбъединитьПути(КаталогПрограммы(), Файл); Если СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86 Или СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86_64 Тогда