Таймер.Остановить (Timer.Stop) Метод

Копировать

Перем ТФ, Таймер1, Счетчик1;

Процедура ПриОткрытии() Экспорт
	// Нажмем программно Кнопка1 послав клавишу вызова 
	ТФ.ОтправитьКлавиши("з", Ложь, Ложь, Ложь);
КонецПроцедуры

Процедура Кнопка1_Нажатие() Экспорт
	Таймер1.Начать();
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	Таймер1.Остановить();
КонецПроцедуры

Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
	Счетчик1 = Счетчик1 + 1;
	ТФ.Верхний.Текст = "Счетчик1 = " + Счетчик1 + " " + ТекущаяУниверсальнаяДатаВМиллисекундах();
КонецПроцедуры

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

Счетчик1 = 0;

Таймер1 = ТФ.Таймер();
Таймер1.Интервал = 1000;
Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");

Кнопка1 = ТФ.Кнопка();
Кнопка1.Текст = "Запустить таймер";
Кнопка1.Икс = ТФ.Позиция.Абсолютно(1);
Кнопка1.Игрек = ТФ.Позиция.Абсолютно(4);
Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ТФ.Верхний.Добавить(Кнопка1);

Кнопка2 = ТФ.Кнопка();
Кнопка2.Текст = "Остановить таймер";
Кнопка2.Игрек = Кнопка1.Игрек;
Кнопка2.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
ТФ.Верхний.Добавить(Кнопка2);
Кнопка2.Правее(Кнопка1, 2);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, Таймер1, Счетчик1;

Процедура ПриОткрытии() Экспорт
	// Нажмем программно Кнопка1 послав клавишу вызова 
	ТФ.ОтправитьКлавиши("з", Ложь, Ложь, Ложь);
КонецПроцедуры

Процедура Кнопка1_Нажатие() Экспорт
	Таймер1.Начать();
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	Таймер1.Остановить();
КонецПроцедуры

Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт
	Счетчик1 = Счетчик1 + 1;
	ТФ.Верхний.Текст = "Счетчик1 = " + Счетчик1 + " " + ТекущаяУниверсальнаяДатаВМиллисекундах();
	Если Счетчик1 > 2 Тогда
		ТФ.Завершить();
	КонецЕсли;
КонецПроцедуры

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

Счетчик1 = 0;

Таймер1 = ТФ.Таймер();
Таймер1.Интервал = 2000;
Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");

Кнопка1 = ТФ.Кнопка();
Кнопка1.Текст = "Запустить таймер";
Кнопка1.Икс = ТФ.Позиция.Абсолютно(1);
Кнопка1.Игрек = ТФ.Позиция.Абсолютно(4);
Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");
ТФ.Верхний.Добавить(Кнопка1);

Кнопка2 = ТФ.Кнопка();
Кнопка2.Текст = "Остановить таймер";
Кнопка2.Игрек = Кнопка1.Игрек;
Кнопка2.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
ТФ.Верхний.Добавить(Кнопка2);
Кнопка2.Правее(Кнопка1, 2);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.Запуск();

Сообщить(?(
Счетчик1 > 2
, "", "!!! ") + "Таймер.Остановить (Timer.Stop) Метод" + " " + ТекущаяДата() + Символы.ПС);