Интересные решения 1С — Windows

С ходу не нашёл решения по задаче:
открыть проводник Windows, и выделить в нём (подсветить) указанный файл.
В итоге пришёл к конкретному решению:
ПолноеИмяФайла = "C:\Users\user\Desktop\34\файл.txt";
ЗапуститьПриложение("C:\Windows\explorer.exe /select, " + Символ(0034) + ПолноеИмяФайла Символ(0034));//0034 - кавычка

Ещё одно интересное решение по фильтрации ввода. В данном случае работает фильтр: латиница, цифры, дефис и нижнее подчёркивание (никогда ранее не думал, что это применимо в 1С, но уже опробовал на практике):
Процедура ШаблонОкончаниеВводаТекста(Элемент)
Шаблон = СокрЛП(СтрЗаменить(Шаблон," ","_")); // на всякий случай меняем пробелы, чтобы слова не слились в одно целое
RegExp = Новый COMОбъект("VBScript.RegExp");
RegExp.IgnoreCase = Истина; //Игнорировать регистр
RegExp.Global = Истина; //Поиск всех вхождений шаблона
RegExp.MultiLine = Ложь; //Многострочный режим
RegExp.Pattern = "[^a-z0-9_-]"; // отбор символов
Шаблон = RegExp.Replace(Шаблон, ""); //действие выполнить
КонецПроцедуры

Ну и по поводу других параметров функции RegExp — в глобальном интернете их много.

P.S.

Как всегда, предупреждаю: аккуратнее при копировании кода — не все веб-символы соответствуют желаемому!

Добавить комментарий

Ваш e-mail не будет опубликован или использован в иных целях.
Your email address will not be published.