Поиск выделенного текста
// поиск выделенного текста в интернет(Кт+LWin)
Стр = Окна.Текст;
Настройка = Главный.Найти(Свойства.Наименование, "Настройка");
Если (Настройка=0) Тогда Возврат; Конец;
Поисковики = Настройка.Найти(Свойства.Наименование, "Настройка поисковиков");
Если (Поисковики=0) Тогда Возврат; Конец;
Индекс = Спросить(Стр, "Поиск строки", 1, , , Поисковики);
Если (Индекс=-1) Тогда Возврат; Конец;
Выбранный = Поисковики.Получить(Индекс);
Стр = Выбранный.'Префикс для адресной строки'+ Стр;
Запустить(Стр);