ДизайнерФормДляОдноСкрипта.УстановитьСвойство (OneScriptFormsDesigner.SetProperty) Метод

Синтаксис

УстановитьСвойство(<ИмяКонтрола>, <ИмяСвойства>, <ЗначениеСвойства>)

Параметры

ИмяКонтрола (обязательный): Тип: Строка.
ИмяСвойства (обязательный): Тип: Строка.
ЗначениеСвойства (обязательный): Тип: Произвольный.

Возвращаемое значение

Описание

Устанавливает значение свойства для контрола.

Примечание

Параметр ИмяСвойства может быть только одним из перечисленных свойств в сетке свойств объекта.

Важно: Метод работает не для всех типов значений. В разработке.

Пример

ДФ.УстановитьСвойство(ИмяКонтрола, "Текст", "ЭтоКнопка");

Полный пример кода

Копировать     Выделить всё

Перем ТекПуть;
Перем ДФ Экспорт;

Процедура Фоновое1(параметр1, параметр2) Экспорт
	Контекст = Новый Структура("Сценарий1", параметр1);
	ЗагрузитьСценарий(ОбъединитьПути(ТекПуть,"ФормаДизайнера.os"), Контекст);
КонецПроцедуры

Процедура СоздатьФайлЗапускаДизайнера()
	ПутьФайла = ОбъединитьПути(ТекПуть,"ФормаДизайнера.os");
	ФайлНаДиске = Новый Файл(ПутьФайла);
	Если Не ФайлНаДиске.Существует() Тогда
		Стр1 = "
		|ПодключитьВнешнююКомпоненту(""C:\444\111\OneScriptFormsDesigner\OneScriptFormsDesigner\bin\Debug\OneScriptFormsDesigner.dll"");
		|ДФ = Новый ДизайнерФормДляОдноСкрипта();
		|Сценарий1.ДФ = ДФ;
		|
		|ДФ.Дизайнер();
		|";
		ТекстДок4 = Новый ТекстовыйДокумент;
		ТекстДок4.УстановитьТекст(Стр1);
		ТекстДок4.Записать(ПутьФайла, "UTF-8");
		Приостановить(1000);
	КонецЕсли;
КонецПроцедуры

ТекПуть = Новый Файл(ТекущийСценарий().Источник).Путь;
СоздатьФайлЗапускаДизайнера();

// Запустим дизайнер.
ДФ = Неопределено;
МассивПараметров = Новый Массив(1);
МассивПараметров[0] = ЭтотОбъект;
ФоновыеЗадания.Выполнить(ЭтотОбъект, "Фоновое1", МассивПараметров);

// Дождемся подключения библиотеки дизайнера.
Пока ДФ = Неопределено Цикл
	Приостановить(500);
КонецЦикла;

// Дождемся запуска дизайнера.
Пока Не ДФ.ДизайнерОткрыт Цикл
	Приостановить(500);
КонецЦикла;

ИмяКонтрола = ДФ.ДобавитьКонтрол("Кнопка");
Сообщить("ИмяКонтрола = " + ИмяКонтрола);
ДФ.УстановитьСвойство(ИмяКонтрола, "Текст", "ЭтоКнопка");

Пока ДФ.ДизайнерОткрыт Цикл
	Приостановить(500);
КонецЦикла;