USB - Если я правильно понимаю эмулятор клавиатуры, т.е. по сути все равно
что в разрыв клавиатуры.


Так вот сканеры, которые подключаются в разрыв клавиатуры отправляют сначала
некий символ (префикс) (символ программируется на самом сканере при помощи
таблицы штрихов), потом цифры штрих-кода, потом некий символ (суффикс, тоже
программируется).

Возможно программа ждет определенный префикс/суффикс, прежде чем начинает
принимать сам код?


Сами контролы, в которых отображается штрих код могут быть readonly. А штрих
записывается например так:

У меня используются сканеры. Так вот в форме, где они используются стоит
превиев кей.
В самом key press формы стоит такой код:

LPARAMETERS nKeyCode, nShiftAltCtrl
DO CASE
CASE nKeyCode=133 && F11 начало ввода штрих-кода (префикс сканера)
ThisForm.Scaned=.t. && Начало ввода штрих-кода
ThisForm.Scanedkod=''
NODEFAULT && Обрати внимание на NODEFAULT
CASE nKeyCode=13 AND ThisForm.Scaned&& Enter
ThisForm.Scaned=.f. && Конец ввода штрих-кода
ThisForm.Razborscanedkod() && Разбираем штрих-код, потом
разложенный по полочкам код раскидываем в соответствующие textbox`ы
(естественно не просто разбираем, а проводим дополнительные необходимые
манипуляции по поиску соответствующих данных в базах и т.п.)
NODEFAULT && Обрати внимание на NODEFAULT!!!
CASE ThisForm.Scaned && Если в данный момент вводится штрих-код
(получили от сканера префикс, но не получили суффикс)
ThisForm.Scanedkod=ThisForm.Scanedkod+CHR(nKeyCode)
NODEFAULT && А вот здесь обрати оссобое внимание на NODEFAULT.
EndCase


Posted via ActualForum NNTP Server 1.4