VesNVT78

Внешняя компонента (ActiveX) подключаемая к вашей среде разработки программ (Например 1С-Предприятие) для работы с весовыми терминалами Невские весы

Вы можете скачать следующие файлы:

    Компонента NevaVes78.ocx   Скачать Объем: 2052 kb
    Изменен:07.12.2010 поддержка ОС Vista/W7
    Изменен:20.12.2010 доработка пробного периода для 1Cv7.7

    Описание компоненты NevaVes78 в формате .doc   Скачать Объем: 545 kb Изменен:31.01.2010
    Примеры подключения NevaVes78 к 1Сv77,HTML,Ecxel,Word Скачать Объем: 88 kb Изменен07.12.2010

    Программа для регистрации компоненты в 1С версии 7   Скачать Объем: 16 kb

§1 Краткое описание

    Внешняя компонента NevaVes78.ocx предназначена для получения данных о работе Невских весов из вашей программы по технологии COM (ActiveX). Среда разработки вашей программы должна поддерживать технологию ActiveX.
NevaVes78 позволяет вам получать показания весов и сервисных сигналов в реальном времени. Примеры подключений компоненты вы можете посмотреть в прилагаемом файле. Компонента автоматически определяет тип весового терминала НВТ-1 или НВТ-3 или ВСТ.

§2 Описание внешней компоненты NevaVes78.ocx

    Данная компонента может подключатся к вашим программам, при условии что ваша среда разработки подерживает технологию СОМ (ActiveX). После подключения компоненты к вашему проекту вы получаете доступ к объекту NevaVes78.NevaVes78Ser. Свойства, события этого объекта вы можете использовать в своём программном коде. Получив доступ к свойствам объекта NevaVes78.NevaVes78Ser вы будете получать необходимую информацию о работе весов в реальном времени. Данная компонента написана с использованием стандарта 1С и отрабатывалась на версии 1Сv.7.7 и 1Сv.8.1 Далее приведены описание свойств и событий объекта Neva.Ves78.NevaVes78Ser и примеры их использования в VB. Примеры использования данной компоненты в 1С, HTML, MS Office вы можете посмотреть в прилагаемом файле.

Свойства объекта NevaVes:
• ComNumber - формат: текстовый(String)
  Определяет номер СОМ-порта (1,2,3,4, и т.д.) в текстовом формате без пробелов
  Пример:
  NevaVes78Ser1.ComNumber = "2" - задает СОМ2
  Text1.Text=NevaVes78Ser1.ComNumber - вывод текущего номера СОМ- порта
  
  
• ComSetting - формат: текстовый(String)
  Задает параметры СОМ- порта : скорость, проверка паритета, количество бит в символе, длина стопового бита, в текстовом формате через запятую без пробелов
  Пример:
  NevaVes78Ser1.ComSetting = "9600,n,8,1" - задаст новые параметры СОМ- порта
  Text1.Text= NevaVes78Ser1.ComSetting - выведет текущее значение настройки СОМ- порта
  Возможные установки:
  Скорость : 110, 300, 1200, 2400, 4800, 9600, 14400, 19200, 28800, 38400, 56000, 128000, 256000
  Режимы контрольного бита(Parity): n,e,o,m,s
  n-без проверки,
  e-с проверкой на четность,
  o-с проверкой на нечетность,
  m-mark,
  s-space
  Количество бит данных в переданном символе: 4,5,6,7,8
  Длина стопового бита: 1, 1.5, 2
  
  
• MinFixVes - формат: целое число (integer)
  Определяет минимальный вес, при котором весы считаются разгруженными. Используется для автоматической фиксации веса при постановке и снятии груза с весов.
  Единица измерения:
  гр- для весов выводящих вес в кг
  кг- для весов выводящих вес в т
  мгр- для весов выводящих вес в гр
  Пример:
  NevaVes78Ser1.MinFixVes=100 - при весе груза менее 100 гр весы будут считаться разгруженными.
  Text1.Text=NevaVes78Ser1.MinFixVes - выводит текущее значение
  
• VesTerminal - формат: текстовый(String)
  Показывает вес с дисплея терминала в данный момент
  Пример:
  Text1.Text= NevaVes78Ser1.VesTerminal - выводит текущее значение веса
  
• TipTerminal - формат: текстовый(String)
  Показывает тип терминала который подключен к весам
  Пример:
  Text1.Text= NevaVes78Ser1.VesTerminal - выводит тип терминала
  
• StatusTerminal - формат: текстовый(String)
  Показывает статус весов (сервисные сигналы для НВТ1 или ВСТ)
  Пример:
  Text1.Text= NevaVes78Ser1.StatusTerminal - выводит статус весов для терминала НВТ1
  
• UnitWeight - формат: текстовый(String)
  Показывает единицу измерения веса
  Пример:
  Text1.Text= NevaVes78Ser1.UnitWeight - выводит единицу измерения веса
  

События объекта NevaVes78:
• ChangeVes
  Событие происходит при изменение веса на дисплее терминала
  Пример обработки события:
  Private Sub NevaVes78Ser1_ChangeVes(ByVal VesChange As Double)
  Text3.Text = VesChange
  End Sub
  Переменная VesChange отображает новое значение веса.
  
  
• StabVes
  Событие происходит, когда весы были загружены и вес стабилизировался. Чтобы генерировать новый цикл этого события весы должны быть разгружены, т.е. вес, отображаемый на терминале, должен стать меньше веса заданного в свойстве MinFixVes.
  Пример обработки события:
  Private Sub NevaVes78Ser1_StabVes(ByVal VesBrutoNVT As Double)
  Text4.Text = VesBrutoNVT
  End Sub
  Переменная VesBrutoNVT отображает значение зафиксированного веса.
  
  
• VesStatus
  Событие происходит при изменении сервисных сигналов терминала НВТ-1.
  Пример обработки события :
  Private Sub NevaVes78Ser1_VesStatus(ByVal VesNul As Integer, VesOk As Integer, VesTara As Integer, VesMax As Integer)
  Text5.Text = VesNul 'выводит состояние бита "весы в нуле"
  Text6.Text = VesOk 'выводит состояние бита "вес стабилен"
  Text7.Text = VesTara 'выводит состояние бита "тара"
  Text8.Text = VesMax 'выводит состояние бита "вес превышает предел взвешивания"
  End Sub
  Параметры для НВТ-1:
  VesNul=1(весы в нуле) VesNul=0(весы не в нуле)
  VesOk=1 (вес стабилен) VesOk=0 (вес не стабилен)
  VesTara=1 (вес тары) VesTara=0 (вес груза)
  VesMax=1 (вес превышает предел взвешивания) VesMax=0 (вес не превышает предел взвешивания)
  Параметры для ВСТ-0:
  VesNul=1(вес стабилен) VesNul=0(вес не стабилен)
  VesOk=1 (вес нетто) VesOk=0 (вес брутто)
  VesTara=1 (вес тары) VesTara=0 (вес не тара)
  VesMax=1 (вес превышает предел взвешивания) VesMax=0 (вес не превышает предел взвешивания)
  

Порядок работы с компонентой:
• Устанавливаете компоненту в ОС
• Добавляете компоненту в ваш проект
• Добавляете компоненту как объект на вашу форму/контейнер
• Если графическое отображение объекта не нужно, то убираете его видимость VesSerNVT1.Visible=False
• Работаете с компонентой как с объектом вашего проекта

Рис.1 Вид объекта NevaVes78

• тип терминала
• индикатор состояния весов
• программный индикатор стабильности
• отображение веса
• единица измерения веса