Имя: Пароль:
1C
1C 7.7
v7: Работа с СОМ-портом
0 G-Re
 
31.08.12
11:50
Уважаемые коллеги!
В системнике установлена плата-расширитель СОМ-портов, их там штук 5, наверное. К каждому прицеплено ну очень нестандартное оборудование(рольганги, штабелеры). Протокол обмена, в общем-то, известен. Как работать с СОМ-портами напрямую? Драйверов нет.
1 Ork
 
31.08.12
11:53
(0) Есть такой контрол MSComm.ocx Могу скинуть пример работы.
2 Ork
 
31.08.12
11:58
+(1)
Вырезка из ГМ.

Перем fso Экспорт, True Экспорт, False Экспорт;
...
Процедура ВывестиСтрокуДисплея(поз, Стр) Экспорт
   Если ДисплейПодключен()=1 Тогда
       ДисплейПокупателя.Output=Симв(27)+?(поз=1,"QA","QB")+AnsiToOem(Стр)+Симв(13);
   КонецЕсли;
КонецПроцедуры
...
Процедура ДисплейПриветствие() Экспорт
   ВывестиСтрокуДисплея(1, Константа.СтрокаПриветсвия1);
   ВывестиСтрокуДисплея(2, Константа.СтрокаПриветсвия2);
КонецПроцедуры
...
Процедура ПодключитьДисплей(Порт)
   Перем Спр;
   Попытка
       ДисплейПокупателя=CreateObject("MSCOMMLib.MSComm");
       Попытка
           ДисплейПокупателя.CommPort=Порт;
           Если ДисплейПокупателя.portOpen=False Тогда
               ДисплейПокупателя.portOpen=True;
           КонецЕсли;
           ДисплейПриветствие();
       Исключение
           Предупреждение(ОписаниеОшибки());
       КонецПопытки;
   Исключение
       Предупреждение(ОписаниеОшибки());
   КонецПопытки;
КонецПроцедуры
...
True=-1;
False=0;

ВасикДа=-1;
ВасикНет=0;

fso=СоздатьОбъект("Scripting.FileSystemObject");
3 Ork
 
31.08.12
11:59
+(3) Пример для вывода на дисплей покупателя. Но принципиальной разницы куда выводить при известном протоколе нет.
4 G-Re
 
31.08.12
12:04
(1,2) Спасибо, скинь, если не сложно, ящик у меня, вроде, открыт. И сам контрол тоже. Буду разбираться.
5 Ork
 
31.08.12
12:13
(4) Здесь : ХТТП://ВражескийФорум/forum24/topic44580/ есть усьо.
6 Vladal
 
31.08.12
12:18
(5) ВражескийФорум = forum.infostart.ru
7 Vladal
 
31.08.12
12:19
(5) он уже давно не вражеский. Кстати, поищи по поиску, кто первый ввёл это определение )))
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn