Имя: Пароль:
1C
 
Перехватчик клавиатуры, выполненный по технологии NATIVE
,
0 Вася Теркин
 
22.08.14
09:25
Интересно, работает или нет.
http://infostart.ru/public/91306/
Не могу проверить, сайт не дает скачивать. Собственно, надо было подключить сканер примерно так
http://infostart.ru/public/178162/
но там тоже не дает скачивать.
Кто пробовал, ответьте здесь или в почту [email protected]
1 Вася Теркин
 
22.08.14
09:47
Так и не ясно что об этом думать.
2 Галахад
 
гуру
22.08.14
09:49
А зачем оно нужно?
3 Вася Теркин
 
22.08.14
09:54
Хочу сканер подключить в разрыв клавиатуры. Есть такой сканер. Но не понятно эта ВК годится мне или нет.
4 Партизан
 
22.08.14
09:55
(3) извращенец. Подключай через COM/USB
5 Остап Сулейманович
 
22.08.14
09:57
(3) Зачем? Вполне стандартная СканОПОС последних версий умеет работать с клавиатурными сканерами.
6 Вася Теркин
 
22.08.14
10:03
(4) У меня уже есть сканер, надо подключать его.
7 Вася Теркин
 
22.08.14
10:03
(5) Ссылка есть?
8 Любопытная
 
22.08.14
10:05
9 Вася Теркин
 
22.08.14
10:08
Спасибо, сейчас посмотрю.
10 Вася Теркин
 
22.08.14
10:50
(8) У меня сканер вставляется в разрыв клавиатуры и мне сдается что ничего не выйдет. Эта компонента порт требует.
11 Вася Теркин
 
22.08.14
10:51
Все таки мне нужен сабж для изучения.
12 Вася Теркин
 
22.08.14
10:51
13 Остап Сулейманович
 
22.08.14
10:54
(10) Не делайте людЯм моск. Для клавиатуры - порт = 0.
14 break
 
22.08.14
10:55
у меня все работает с использованием http://infostart.ru/public/147793/
15 Вася Теркин
 
22.08.14
10:55
(13) Хорошо... Скорость тоже 0?
16 break
 
22.08.14
10:58
(14) все подключение:
Процедура ПодключениеСканера()
    
    Попытка
        ПрогИД = "AddIn.Scaner45";
        ПодключитьВнешнююКомпоненту(ПрогИД);
        ДрайверШК = Новый (ПрогИД);
        ДрайверШК.УстройствоВключено = 1;
        ДрайверШК.НомерПорта = 100;
        ДрайверШК.Суффикс = Символ(13);
    Исключение
        
        Попытка
            ПутьККомпоненте = КаталогПрограммы() + "Scaner1c.dll";
            ЗагрузитьВнешнююКомпоненту(ПутьККомпоненте);
            Сообщить("Компонента " + ПутьККомпоненте+" загружена");
        Исключение
            Сообщить("Не удалось загрузить компоненту: " + ПутьККомпоненте);
        КонецПопытки;
        
        Попытка
            ПрогИД = "AddIn.Scaner45";
            ПодключитьВнешнююКомпоненту(ПрогИД);
            ДрайверШК = Новый (ПрогИД);
            ДрайверШК.УстройствоВключено = 1;
            ДрайверШК.НомерПорта = 100;
            ДрайверШК.Суффикс = Символ(13);
            Сообщить("Сканер штрих-кодов подключен!");
        Исключение
            Сообщить("Сканер штрих-кодов не подключен!");
        КонецПопытки;
            
    КонецПопытки;
    
КонецПроцедуры
17 Вася Теркин
 
22.08.14
11:03
18 Вася Теркин
 
22.08.14
11:22
Только что мне сказали ,что сканер, вероятно заменят на usb. Будем ждать что в итоге. Пока не получится пробовать.
19 Вася Теркин
 
22.08.14
11:23
Пока всем спасибо
20 Torquader
 
22.08.14
23:08
Основная проблема клавиатурных сканеров в том, что они отдают данные в активное окно приложения, то есть если кто-то открыл блокнот, то 1С ничего не получит.
Конечно, можно написать фильтр клавиатуры на уровне событий ядра - но это долго и сложно.
RS-232 или USB-RS-Emulation сканеры лишены этого недостатка - они всегда передают данные в ту программу, которая открыла порт - но здесь другая проблема - нельзя одновременно работать с двумя базами 1С.
21 jsmith82
 
22.08.14
23:13
ich habe
Основная теорема систематики: Новые системы плодят новые проблемы.