Исправить набранный текст
// Исправление орфографических ошибок в только что введенном тексте с новой строки
// По умолчанию в программе Faster данный скрипт подключен к шорткату'Конец Конец'('End End').
// После запуска Faster в любом редакторе наберите предложение с ошибками и нажмите два раза кнопку'Конец'('End').
Текст = Окна.'Набранный текст';
Если (Текст="") Тогда Возврат; Конец;
ВременныйОбъект = Этот.Определить(0, Объекты.Текст, Свойства.Наименование, "Временный");
ВременныйОбъект.Текст = Текст;
Скрипты.Выполнить("Исправить текст", ВременныйОбъект);
Если (Текст<>ВременныйОбъект.Текст) Тогда
// Сообщить(Текст, ВременныйОбъект.Текст);
Нажать(Клавиши.Стереть, Строки.Длина(Текст)); // стираем старый текст
Ввести(ВременныйОбъект.Текст); // вводим правильный текст
Конец;