Текстовый.ОчиститьИсторию (TextView.ClearHistoryChanges) Метод

Копировать

Перем ТФ, Текстовый1;

Процедура ПриОткрытии() Экспорт
	ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик");
КонецПроцедуры

Процедура ТаймерТик() Экспорт
	ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.RightArrow);
	ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.RightArrow);
	Текстовый1.УдалитьСимволСлева();
	Текстовый1.ОчиститьИсторию();
	ЕстьИстория = Текстовый1.ЕстьИстория;
	ТФ.Уведомление().Показать("ЕстьИстория = " + ЕстьИстория, -1);
КонецПроцедуры

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

Текстовый1 = ТФ.Верхний.Добавить(ТФ.Текстовый(2, 4, 50, 15));
Текстовый1.Перенос = Истина;
Текстовый1.Текст = "Строка 0";
Текстовый1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Текстовый1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Белый);

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

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

Копировать

Перем ТФ, Текстовый1, ЕстьИстория;

Процедура ПриОткрытии() Экспорт
	ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик");
КонецПроцедуры

Процедура ТаймерТик() Экспорт
	ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.RightArrow);
	ТФ.ОтправитьКлавишуКонсоли(ТФ.КлавишиКонсоли.RightArrow);
	Текстовый1.УдалитьСимволСлева();
	Текстовый1.ОчиститьИсторию();
	ЕстьИстория = Текстовый1.ЕстьИстория;
	ТФ.Уведомление().Показать("ЕстьИстория = " + ЕстьИстория, -1);
	ТФ.Завершить();
КонецПроцедуры

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

Текстовый1 = ТФ.Верхний.Добавить(ТФ.Текстовый(2, 4, 50, 15));
Текстовый1.Перенос = Истина;
Текстовый1.Текст = "Строка 0";
Текстовый1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Текстовый1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Белый);

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

Сообщить(?(
Не ЕстьИстория
, "", "!!! ") + "Текстовый.ОчиститьИсторию (TextView.ClearHistoryChanges) Метод" + " " + ТекущаяДата() + Символы.ПС);