ПолеВводаОснова.Отменить (TextBoxBase.Undo) Метод

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

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

ПолеВвода1 = Форма1.ЭлементыУправления.Добавить(Ф.ПолеВвода());
ПолеВвода1.Текст = "Возвращает или задает значение, указывающее текст, выбранный в настоящий момент в элементе управления.";
ПолеВвода1.Стыковка = Ф.СтильСтыковки.Заполнение;
ПолеВвода1.МногострочныйРежим = Истина;

ПолеВвода1.НачалоВыделения = 11;
ПолеВвода1.ДлинаВыделения = 0;
ПолеВвода1.Фокус();

Ф.ОтправитьКлавиши("d");
Приостановить(1000);

ПолеВвода1.Отменить();

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

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

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

ПолеВвода1 = Форма1.ЭлементыУправления.Добавить(Ф.ПолеВвода());
ПолеВвода1.Текст = "Возвращает или задает значение, указывающее текст, выбранный в настоящий момент в элементе управления.";
ПолеВвода1.Стыковка = Ф.СтильСтыковки.Заполнение;
ПолеВвода1.МногострочныйРежим = Истина;

ПолеВвода1.НачалоВыделения = 11;
ПолеВвода1.ДлинаВыделения = 0;
ПолеВвода1.Фокус();

Если Ф.ПлатформаWin Тогда
	Ф.ОтправитьКлавиши("d");
	Приостановить(1000);

	ПолеВвода1.Отменить();

	Сообщить(?(
	ПолеВвода1.Текст = "Возвращает или задает значение, указывающее текст, выбранный в настоящий момент в элементе управления."
	, "", "!!! ") + "ПолеВводаОснова.Отменить (TextBoxBase.Undo) Метод" + " " + ТекущаяДата());
Иначе
	Сообщить(?(
	Истина
	, "", "!!! ") + "ПолеВводаОснова.Отменить (TextBoxBase.Undo) Метод" + " " + ТекущаяДата());
КонецЕсли;