Переключатель клавиатуры для 1С

17.06.09

Разработка - Разработка внешних компонент

+11 –
Переключатель клавиатуры для 1С

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
dynwrap.dll
.1245224758 36,00Kb
54 2 500 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Часто при сканировании сканером штрих кода с буквами бывает необходимо переключить язык на определенный. Для этого я использую dynwrap.dll. При этом в конфигурации прописываем, для версии 7.7:

//*******************************************
Процедура Раскладка(Кнопка)
    Если  Кнопка = "rus" тогда
        Wrapper.LoadKeyboardLayout(SRus, 1);
        Wrapper.ActivateKeyboardLayout(NRus, 0);   
    Иначеесли  Кнопка = "eng" тогда   
        Wrapper.LoadKeyboardLayout(SEng, 1);
        Wrapper.ActivateKeyboardLayout(NEng, 0);   
      ИначеЕсли Кнопка = "ukr" тогда   
          Wrapper.LoadKeyboardLayout(SUkr, 1);
        Wrapper.ActivateKeyboardLayout(NUkr, 0);   
    КонецЕсли;
КонецПроцедуры
//********************************************

Процедура ПриОткрытии() 
    Раскладка("eng");
КонецПроцедуры;

//Переключатель клавитуры   
Wrapper = createobject("DynamicWrapper");

Wrapper.Register("USER32.DLL", "ActivateKeyboardLayout", "i=ll", "f=s", "r=l");
Wrapper.Register("USER32.DLL", "LoadKeyboardLayout", "i=sl", "f=s", "r=t");
Wrapper.Register("USER32.DLL", "GetKeyboardLayoutName", "i=r", "f=s", "r=l");

SRus = "00000419";
SEng = "00000409";
SUkr = "00000422";


NRus = 1049;
NEng = 1033;
NUkr = 1058;

для версии 8.1 :

Процедура Раскладка(Кнопка)
    Если  Кнопка = "rus" тогда
        Wrapper.LoadKeyboardLayout(SRus, 1);
        Wrapper.ActivateKeyboardLayout(NRus, 0);   
    Иначеесли  Кнопка = "eng" тогда   
        Wrapper.LoadKeyboardLayout(SEng, 1);
        Wrapper.ActivateKeyboardLayout(NEng, 0);   
      ИначеЕсли Кнопка = "ukr" тогда   
          Wrapper.LoadKeyboardLayout(SUkr, 1);
        Wrapper.ActivateKeyboardLayout(NUkr, 0);   
    КонецЕсли;
КонецПроцедуры

Процедура ПриОткрытии() 
    Раскладка("eng");
 КонецПроцедуры  

//Переключатель клавитуры   
Wrapper = Новый COMОбъект("DynamicWrapper");

Wrapper.Register("USER32.DLL", "ActivateKeyboardLayout", "i=ll", "f=s", "r=l");
Wrapper.Register("USER32.DLL", "LoadKeyboardLayout", "i=sl", "f=s", "r=t");
Wrapper.Register("USER32.DLL", "GetKeyboardLayoutName", "i=r", "f=s", "r=l");

SRus = "00000419";
SEng = "00000409";
SUkr = "00000422";


NRus = 1049;
NEng = 1033;
NUkr = 1058;

Очень помогает, если используется Code128

Вступайте в нашу телеграмм-группу Инфостарт

+11 –

См. также

HTTP сервер, HTTP асинхронный клиент, клиент ГИС МТ "Честный знак" внешние компоненты для 1С 7.7

Разработка внешних компонент WEB-интеграция Программист 1С:Предприятие 7.7 1C77 Платные (руб)

Компонента HttpSrv7 позволяет создавать веб-сервисы в среде 1С 7.7 и, используя файлы HTML, несложные веб-сайты. С помощью нее можно обеспечить доступ к данным 1С 7.7 из браузера. Дополнительно используя компоненту HTTP_Async можно наладить обмен данными между удаленными информационными базами по протоколам HTTP, HTTPS и WebSocket. С помощью компоненты HttpSrv7 используя протокол WebSocket можно создавать и поддерживать работу нескольких чатов. С помощью компоненты HTTP_Async можно асинхронно отправлять HTTP-запросы к сайтам, веб-сервисам (в т.ч. к HTTPSrv7) и обрабатывать ответы по мере их поступления. Компонента GISMT в дополнение к HTTP_Async имеет функцию цифровой подписи в формате Base64 и, таким образом, имеет все возможности для работы с API ГИС МТ "Честный знак" непосредственно из среды 1С 7.7.

6100 руб.

27.05.2022    12260    2    20    

39
Конфигурация «Информационный киоск». Обработки выгрузки товаров для ТиС 9.2, УТ 10.3, УТ 11 (обмен данными с любой конфигурацией 1С 7.7, 8.х)

Оптовая торговля Розничная торговля Перенос данных 1C Сканер штрих-кода Системный администратор Программист 1С:Предприятие 7.7 1С:Предприятие 8 1C:Бухгалтерия 1C77 Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Рестораны, кафе и фаст-фуд Управленческий учет Платные (руб)

ПО «Информационный киоск» предназначено для организации offline доступа клиента (покупателя) к информации о товарах, услугах или дисконтных картах посредством сканирования штрих-кода. Основная цель – мгновенно предоставить наиболее актуальную информацию о цене, остатках, наименовании товара (услуги) или накоплениях, держателе, состоянии дисконтной карты.

1800 руб.

21.12.2014    61903    9    21    

21
Компонента ExchangeStruc (Структура Обмена). Прямой обмен данными между потоками, сессиями и окнами.

Разработка внешних компонент Системный администратор Программист 1С:Предприятие 7.7 1С:Предприятие 8 Россия Платные (руб)

Аддон "Структура Обмена" (ExchangeStruc) - это компонента, которая обеспечивает доступ к разделяемым процессом структурам, аналогичным структурам 1С. Обеспечивает прозрачную передачу данных примитивных типов, в том числе Двоичных данных, в режиме Реального времени между разными контекстами (формами) или потоками одного процесса. В перспективе функционал будет расширен для обмена между процессами, даже разных версий платформ. Совместим с версиями Windows рабочих станций и серверов, с платформами 1С разных версий и релизов в режиме Native начиная с 8.2, и в режиме COM начиная с версий 7.7. По скорости чтения и записи лишь немногим уступает стандартной структуре 1С. НОВОЕ: Добавлен функционал регистрации компоненты COM в качестве OLE Auto (COMОбъект) для поддержки её работы в серверах старых версий 1С: 8.0 и 8.1, где работа с компонентами исключена. Теперь можно коммуникацию с Фоновыми заданиями на этих версиях проводить.

7320 руб.

19.04.2023    6773    1    0    

3
Выбор из большого списка для 1С 7.7

Разработка внешних компонент Программист 1С:Предприятие 7.7 Платные (руб)

Компонента для выбора значения из больших списков значений.

5084 руб.

02.12.2021    7702    3    19    

5
Криптография: внешняя компонента для 1С 7.7

Разработка внешних компонент Защита ПО и шифрование Программист 1С:Предприятие 7.7 Абонемент ($m)

Цифровые подписи, шифрование, просмотр сертификатов ключей ЭЦП, работа с различными криптопровайдерами (в т.ч. КриптоПРО ГОСТ 2012) в 1С 7.7.

1 стартмани

08.06.2020    11266    31    mdbruyfn    10    

9
Клиент HTTP(S): внешняя компонента для 1С 7.7

Разработка внешних компонент WEB-интеграция Программист 1С:Предприятие 7.7 Абонемент ($m)

Компонента позволяет использовать различные веб-сервисы интернет-ресурсов, например работать с онлайн-кассой через API, предоставленное ее разработчиком. Тестировалась на платформе 1С релиза 7.70.027.

1 стартмани

14.11.2019    23007    135    mdbruyfn    110    

19
Поддержка выгрузки в Excel 2007 для 1С 7.7 в одну строку

Разработка внешних компонент Загрузка и выгрузка в Excel Программист 1С:Предприятие 7.7 1C77 Абонемент ($m)

Внешняя компонента 1С 7.7. для сохранения таблиц в формате Excel 2007.

1 стартмани

21.03.2019    33055    84    MadDAD    332    

20
Формирование строки json в 1С: 7.7

Универсальные функции Программист 1С:Предприятие 7.7 1C77 1С:Комплексная 7.7 Абонемент ($m)

Предлагается набор функций 1с 7.7 для формирования строки json стандартными средствами.

1 стартмани

10.12.2018    13284    malovandrey    7    

19
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Огонек 27 29.05.13 18:15 Сейчас в теме
Спасибо автору, информация пригодилась в своей разработке.
+ – Ответить
2. nano1c 174 08.12.21 11:08 Сейчас в теме
Все гораздо проще:

WshShell = Новый COMОбъект( "WScript.Shell" );
WshShell.SendKeys("a{ENTER}");
ВвестиСтроку(Стр,"",1);
Если КодСимвола(стр)<>97 Тогда
WshShell.SendKeys("+^",1);
WshShell.SendKeys("%^",1);
конецесли;

Или еще правильней трансформацию символов делать :
https://infostart.ru/public/1544660/
+ – Ответить
Для отправки сообщения требуется регистрация/авторизация