#202

Pr-Mex · Mar 5, 2019 · 4406a89 · 4406a89
1 parent 7c00b09
commit 4406a89
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/features/Libraries/VB/step_definitions/ТестированиеVA/Forms/Форма/Ext/Form/Module.bsl b/features/Libraries/VB/step_definitions/ТестированиеVA/Forms/Форма/Ext/Form/Module.bsl
@@ -33,6 +33,7 @@
 	//ДобавитьШагВМассивТестов(ВсеТесты,Снипет,ИмяПроцедуры,ПредставлениеТеста,Транзакция,Параметр);
 	Ванесса.ДобавитьШагВМассивТестов(ВсеТесты,"ЯВыполняюМетодШагСТекстомИОнНеВызываетИсключение(ТабПарам)","ЯВыполняюМетодШагСТекстомИОнНеВызываетИсключение","И я выполняю метод шаг с текстом и он не вызывает исключение","","");
 	Ванесса.ДобавитьШагВМассивТестов(ВсеТесты,"ЯВыполняюМетодШагСТекстомИОнВызываетИсключение(ТабПарам)","ЯВыполняюМетодШагСТекстомИОнВызываетИсключение","И я выполняю метод шаг с текстом и он вызывает исключение","","");
+	Ванесса.ДобавитьШагВМассивТестов(ВсеТесты,"ЯПомещаюВБуферОбменаСтроку(Парам01)","ЯПомещаюВБуферОбменаСтроку","И я помещаю в буфер обмена строку 'Нужная строка'","Помещает строку в буфер обмена.","Прочее.Буфер обмена");
 
 	Возврат ВсеТесты;
 КонецФункции
@@ -98,3 +99,16 @@
 	КонецЕсли;	 
 КонецПроцедуры
 
+&НаКлиенте
+//И я помещаю в буфер обмена строку 'Вывод произвольной информации в лог с помощью шага'
+//@ЯПомещаюВБуферОбменаСтроку(Парам01)
+Процедура ЯПомещаюВБуферОбменаСтроку(Стр) Экспорт
+	ИмяВременногоФайла = ПолучитьИмяВременногоФайла("txt");
+	ЗТ = Новый ЗаписьТекста(ИмяВременногоФайла,"UTF-8",,Истина); 
+	ЗТ.Записать(Стр); 
+	ЗТ.Закрыть();
+
+	СтрокаКоманды = "clip < ""%1""";
+	СтрокаКоманды = СтрЗаменить(СтрокаКоманды,"%1",ИмяВременногоФайла);
+	Ванесса.ВыполнитьКомандуОСБезПоказаЧерногоОкна(СтрокаКоманды);
+КонецПроцедуры