|
|
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Народ, кто нибудь пробовал в VFP работать с сканнерами штрих-кода подключенными к COM портам через MSCOMM? Если да, опишите приерчиком что и как нужно делать, **** Form.Init --------------------------------------------- WITH Thisform .MSComm1.CommPort = .Combo1.ListIndex .MSComm1.Settings = "9600,N,8,1" .MSComm1.InputLen = 0 .MSComm1.PortOpen = .T. ENDWITH MSConn.OnEvent *-------------------- WITH this Buffer = .Input Wait window .Input ENDWITH **** Form.Init --------------------------------------------- **** Form.Unload --------------------------------- WITH This .MSComm1.PortOpen = .F. ENDWITH почему-то не хочет работать.... Всем спасибо... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.02.2005, 15:15 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Я ставил программу от третьей фирмы, которая преобразовывала автоматом данные со сканера (COM порт) в ввод с клавиатуры и возврат корретки... А вообще - купите лучше сканер на USB - сейчас они стоят копейки и работают очень просто и надежно (ничего под них не надо специально программировать)... Good luck! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.02.2005, 23:08 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Sergey Ch а копейки это сколько? и марка сканера ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.02.2005, 13:43 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Александр ТретьяковSergey Ch а копейки это сколько? и марка сканера Ручной сканер штрихкодов USB (FBC-3860) - 75 USD, например - но можно взять и дешевле (поиск - покажет) тынц ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.02.2005, 17:28 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Нет парни, у меня оборудование на com портах... так что ничего не получится из ваших советов... понятно.... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.02.2005, 18:41 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Посмотрите здесь. http://www.foxclub.ru/sol/index.php?kat=12&act=list ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.03.2005, 10:18 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
Добавление к предыдущему Решения/Система/#417 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.03.2005, 10:19 |
|
||
|
Сканнер штрих кода ч/з COM порт для VFP
|
|||
|---|---|---|---|
|
#18+
win xp sp2, vfp 9 sp2 Проверял только на чтение со сканера штрих-кодов устанавливаем на форму Olecontrol MSComm 6.0 ********* Form.Init Thisform.Olecontrol1.CommPort = 2 *номер com порта Thisform.Olecontrol1.RThreshold = 1 *теперь при поступлении данных запустится Thisform.Olecontrol1.OnComm() * Thisform.Olecontrol1.Settings = '9600,n,8,1' * настройка порта по умолчанию (если нужно - изменить) Thisform.Olecontrol1.PortOpen = .T. * включаем порт ********* ********* Thisform.Olecontrol1.OnComm() local c1 c1 = This.Input * поступившие данные попадают в Thisform.Olecontrol1.Input * сохраняем данные в переменной c1 т.к. после чтения в Input будет пусто wait window c1 nowait ********* При закрытии формы или когда нужно выключить Thisform.Olecontrol1.PortOpen = .F. * выключаем порт ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.02.2008, 02:06 |
|
||
|
|

start [/forum/topic.php?fid=41&msg=35125545&tid=1588174]: |
0ms |
get settings: |
9ms |
get forum list: |
13ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
49ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
50ms |
get tp. blocked users: |
1ms |
| others: | 195ms |
| total: | 331ms |

| 0 / 0 |
