Skip to content

Commit

Permalink
Оптимизация расхода памяти #1806
Browse files Browse the repository at this point in the history
  • Loading branch information
Pr-Mex committed Nov 18, 2022
1 parent 3dccda8 commit e5d2a16
Showing 1 changed file with 10 additions and 4 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -33361,7 +33361,7 @@
МассивСтрок = Шаг.ПереданныеВШагТаблицы[0];
Иначе
ТекстШага = Шаг.Имя;
Если ЗначениеЗаполнено(Шаг.ТекстИнструкция) Тогда
Если Шаг.Свойство("ТекстИнструкция") И ЗначениеЗаполнено(Шаг.ТекстИнструкция) Тогда
ТекстШага = Шаг.ТекстИнструкция;
КонецЕсли;

Expand Down Expand Up @@ -38525,7 +38525,7 @@
СписокАргументов = ТекШаг.ЗначенияПараметров;

МассивПараметров = ПолучитьМассивПараметровИзСписокАргументов(СписокАргументов, ТекШаг);
Если ТекШаг.ШагСПараметрамиВТаблице = Истина Тогда
Если ТекШаг.Свойство("ШагСПараметрамиВТаблице") И ТекШаг.ШагСПараметрамиВТаблице = Истина Тогда
Для Каждого ТабПарам Из ТекШаг.МассивТаблиц Цикл
МассивПараметров.Добавить(ТабПарам);
КонецЦикла;
Expand Down Expand Up @@ -43656,8 +43656,14 @@
НужноОжидатьОкончанияОзвучкиШага = Истина;
ПараметрыВидео = ПолучитьПараметрыЗаписиВидео();
ПодключитьБиблиотекуРаботыСВидео();
ПараметрыВидео.Вставить("ТекстДляТестаГолоса", ТекШаг.ТекстИнструкция);
Отладка("Text=" + ТекШаг.ТекстИнструкция);
Если ТекШаг.Свойство("ТекстИнструкция") Тогда
ПараметрыВидео.Вставить("ТекстДляТестаГолоса", ТекШаг.ТекстИнструкция);
Иначе
ПараметрыВидео.Вставить("ТекстДляТестаГолоса", "");
КонецЕсли;
Если ТекШаг.Свойство("ТекстИнструкция") Тогда
Отладка("Text=" + ТекШаг.ТекстИнструкция);
КонецЕсли;
ПараметрыВидео.Вставить("ОзвучкаВыполненияСценария", Истина);
ПараметрыВидео.Вставить("Шаг", ТекШаг);
ПараметрыВидео.Вставить("КопироватьФайлMp3", Ложь);
Expand Down

0 comments on commit e5d2a16

Please sign in to comment.