Турбоконф 5.15.7629.24166 Платформа 8.3.19

// 
//
// Параметры:
//    –  – 
//                 ;
//    –  – 
//                 .
//
Процедура УстановитьТекст(Текст)

	ТекущееПоле = ЭлементыФормы[мТекущаяСтраница.Имя];
	ВыделитьВсе = ПараметрВыделитьВсе;
	Если ТипЗнч(ТекущееПоле) = Тип("ПолеВвода") Тогда
		ТекущееПоле.Значение = Текст;
		ВыделитьВсе = Истина;
	ИначеЕсли ТекущееПоле = ЭлементыФормы.JSON Тогда
		Если мРедакторJSON = Неопределено Тогда
			Возврат;
		КонецЕсли; 
		мРедакторJSON.setText(Текст);
	Иначе
		ТекущееПоле.УстановитьТекст(Текст);
	КонецЕсли; 
	Если ВыделитьВсе И СтрДлина(Текст) > 0 Тогда
		ТекущееПоле.УстановитьГраницыВыделения(1, СтрДлина(Текст) + 1);
	КонецЕсли; 

КонецПроцедуры