ФормыДляОдноСкрипта.КольцевойИндикатор (OneScriptForms.CircularProgressBar) Метод

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

КольцевойИндикатор1 = Ф.КольцевойИндикатор();
КольцевойИндикатор1.Родитель = Форма1;
КольцевойИндикатор1.Размер = Ф.Размер(200, 25);

Пока Форма1.Отображать Цикл
	КольцевойИндикатор1.Значение = 0;
	Для А = 1 По 100 Цикл
		Приостановить(5);
		КольцевойИндикатор1.Увеличение(1);
		
		Если Не Форма1.Отображать Тогда
			Прервать;
		КонецЕсли;
	КонецЦикла;
КонецЦикла;

Ф.ЗапуститьОбработкуСобытий();

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

КольцевойИндикатор1 = Ф.КольцевойИндикатор();

Сообщить(?(
ТипЗнч(КольцевойИндикатор1) = Тип("КлКольцевойИндикатор")
, "", "!!! ") + "ФормыДляОдноСкрипта.КольцевойИндикатор (OneScriptForms.CircularProgressBar) Метод" + " " + ТекущаяДата());