Чтение и запись.
Тип: Строка.
Возвращает или задает идентификатор для элемента.
Индикатор1.Идентификатор = "Идент";
Перем ТФ, Индикатор1, Идентификатор, Окно1, Индикатор2, Счетчик1, Таймер1; Процедура ПриОткрытии() Экспорт Идентификатор = Индикатор1.Идентификатор; ТФ.Уведомление().Показать("Идентификатор = " + Идентификатор, 3000); КонецПроцедуры Процедура Кнопка1_Нажатие() Экспорт Счетчик1 = 0; Индикатор1.Значение = 0; Индикатор2.Значение = 0; Таймер1.Начать(); КонецПроцедуры Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт Счетчик1 = Счетчик1 + 0.01; Индикатор1.Значение = Счетчик1; Индикатор2.Значение = Счетчик1; Окно1.Текст = "Счетчик1 = " + Счетчик1 + " " + ТекущаяУниверсальнаяДатаВМиллисекундах(); Если Счетчик1 >= 1 Тогда Индикатор1.Значение = 0.25; Индикатор2.Значение = 0.4; Таймер1.Остановить(); КонецЕсли; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно1"; Окно1.Заполнить(); ЦветоваяСхема1 = ТФ.ЦветоваяСхема(); ЦветоваяСхема1.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); ЦветоваяСхема1.Фокус = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.ТемноСерый); Окно1.ЦветоваяСхема = ЦветоваяСхема1; ТФ.Верхний.Добавить(Окно1); Индикатор1 = ТФ.Индикатор(); Индикатор1.Центр(); Индикатор1.Ширина = ТФ.Величина.Процент(45); Индикатор1.Высота = ТФ.Величина.Абсолютно(1); Индикатор1.Значение = 0.25; Индикатор1.ЦветоваяСхема = ТФ.Цвета.Ошибка; Окно1.Добавить(Индикатор1); Индикатор2 = ТФ.Индикатор(); Индикатор2.Центр(); Индикатор2.Ширина = ТФ.Величина.Процент(45); Индикатор2.Высота = ТФ.Величина.Абсолютно(1); Индикатор2.Значение = 0.4; Индикатор2.ЦветоваяСхема = ТФ.Цвета.Основа; Индикатор2.СтильИндикатора = ТФ.СтильИндикатора.БегущаяПолоса; Индикатор2.Ниже(Индикатор1, 1); Окно1.Добавить(Индикатор2); Кнопка1 = ТФ.Кнопка(); Кнопка1.Текст = "Старт"; Кнопка1.Центр(); Кнопка1.Выше(Индикатор1, 2); Кнопка1.Ширина = ТФ.Величина.Абсолютно(10); Кнопка1.Высота = ТФ.Величина.Абсолютно(1); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница1; Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие"); Окно1.Добавить(Кнопка1); Счетчик1 = 0; Таймер1 = ТФ.Таймер(); Таймер1.Интервал = 50; Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера"); Индикатор1.Идентификатор = "Идент"; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Индикатор1, Идентификатор, Окно1, Индикатор2, Счетчик1, Таймер1; Процедура ПриОткрытии() Экспорт Идентификатор = Индикатор1.Идентификатор; ТФ.Уведомление().Показать("Идентификатор = " + Идентификатор, 3000); КонецПроцедуры Процедура Кнопка1_Нажатие() Экспорт Счетчик1 = 0; Индикатор1.Значение = 0; Индикатор2.Значение = 0; Таймер1.Начать(); КонецПроцедуры Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт Счетчик1 = Счетчик1 + 0.01; Индикатор1.Значение = Счетчик1; Индикатор2.Значение = Счетчик1; Окно1.Текст = "Счетчик1 = " + Счетчик1 + " " + ТекущаяУниверсальнаяДатаВМиллисекундах(); Если Счетчик1 >= 1 Тогда Индикатор1.Значение = 0.25; Индикатор2.Значение = 0.4; Таймер1.Остановить(); КонецЕсли; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно(); Окно1.Заголовок = "Окно1"; Окно1.Заполнить(); ЦветоваяСхема1 = ТФ.ЦветоваяСхема(); ЦветоваяСхема1.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); ЦветоваяСхема1.Фокус = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.ТемноСерый); Окно1.ЦветоваяСхема = ЦветоваяСхема1; ТФ.Верхний.Добавить(Окно1); Индикатор1 = ТФ.Индикатор(); Индикатор1.Центр(); Индикатор1.Ширина = ТФ.Величина.Процент(45); Индикатор1.Высота = ТФ.Величина.Абсолютно(1); Индикатор1.Значение = 0.25; Индикатор1.ЦветоваяСхема = ТФ.Цвета.Ошибка; Окно1.Добавить(Индикатор1); Индикатор2 = ТФ.Индикатор(); Индикатор2.Центр(); Индикатор2.Ширина = ТФ.Величина.Процент(45); Индикатор2.Высота = ТФ.Величина.Абсолютно(1); Индикатор2.Значение = 0.4; Индикатор2.ЦветоваяСхема = ТФ.Цвета.Основа; Индикатор2.СтильИндикатора = ТФ.СтильИндикатора.БегущаяПолоса; Индикатор2.Ниже(Индикатор1, 1); Окно1.Добавить(Индикатор2); Кнопка1 = ТФ.Кнопка(); Кнопка1.Текст = "Старт"; Кнопка1.Центр(); Кнопка1.Выше(Индикатор1, 2); Кнопка1.Ширина = ТФ.Величина.Абсолютно(10); Кнопка1.Высота = ТФ.Величина.Абсолютно(1); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница1; Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие"); Окно1.Добавить(Кнопка1); Счетчик1 = 0; Таймер1 = ТФ.Таймер(); Таймер1.Интервал = 50; Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера"); Индикатор1.Идентификатор = "Идент"; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Идентификатор = Индикатор1.Идентификатор , "", "!!! ") + "Индикатор.Идентификатор (ProgressBar.Id) Свойство" + " " + ТекущаяДата() + Символы.ПС);