Сегодня стало для меня открытием, что Windows 10 содержит в «базе» SSH и Telnet клиенты. С одним нюансом — подключается к удаленным серверам с кодировкой локали cp1251. Соответственно, чтобы полноценно работать на удаленном клиенте, нужно поставить локаль ru_RU.cp1251, при помощи:
|
1 2 |
apt-get install locales dpkg-reconfigure locales |
Выбрать помимо en_US.UTF8, еще и ru_RU.cp1251
Как извесно боль запросов 1С, в невозможности «штатно» определить длину строки в запросе. Вот один из обходных «велосипедов»:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 |
&НаСервере Процедура ПроанализироватьНаСервере(имя) ТекстДерево = Дерево("ацукацукацук.Поле_1_1", -1, 300); Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1 | " + ТекстДерево + " КАК Длина |ИЗ | РегистрСведений.ацукацукацук КАК ацукацукацук |УПОРЯДОЧИТЬ ПО | Длина УБЫВ"; РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); Пока ВыборкаДетальныеЗаписи.Следующий() Цикл сообщить(ВыборкаДетальныеЗаписи.Длина); КонецЦикла; КонецПроцедуры &НаСервере Функция Дерево(Реквизит, Начало, Конец) Экспорт Если Начало + 1 = Конец Тогда Возврат Строка(Конец); КонецЕсли; Середина = Начало + Цел((Конец - Начало) / 2); СтрокаДерево = "ВЫБОР КОГДА ПОДСТРОКА(" + Реквизит + ", " + (Середина + 1) + ", 3) = """" ТОГДА " + Дерево(Реквизит, Начало, Середина) + " ИНАЧЕ " + Дерево(Реквизит, Середина, Конец) + " КОНЕЦ"; Возврат СтрокаДерево; КонецФункции |
Задача: раскрасить ячейки в ТЗ на форме в зависимости от условий.
Решение: будем использовать условное оформление, которое назначается перед выводом формы на экран. Например в процедуре «ПриСозданииНаСервере»
|
1 2 3 4 5 6 7 8 9 10 11 |
ЭлементОформления = УсловноеОформление.Элементы.Добавить(); Оформление = УсловноеОформление.Элементы.Добавить(); Оформление.Использование = Истина; Поле1 = Оформление.Поля.Элементы.Добавить(); Поле1.Поле = Новый ПолеКомпоновкиДанных("тчСумма"); Отбор = Оформление.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных")); Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Объект.тч.СуммаПениНачисленная"); Отбор.ПравоеЗначение = 0; Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.НеРавно; Отбор.Использование = Истина; Оформление.Оформление.УстановитьЗначениеПараметра("ЦветФона", WebЦвета.Аквамарин); |
Казалось бы удобная вещь. Сворачивание в трей по закрытию программы, чтобы она фоново висела и проверяла почту. Ан нет — нет такой возможности сделать через GUI. Только через реестр. Для этого нужно в ветке Компьютер\HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Outlook\Preferences добавить переменную MinToTray формата DWORD равную 1
После чего, после перезагрузки ПК, Outlook будет сворачиваться в трей при закрытии.
