// перевод выделенного текста в интернет(Кт+LWin LWin)
Стр = Окна.Текст;
Если (Стр="") Тогда Возврат; Конец;
Объект       = Этот.Определить(0, Объекты.Текст, Свойства.Наименование, "Временный");
Объект.Текст = Стр;
Скрипты.Выполнить("Переводчик", Объект);