// запускается только в 1С(7.7, 8.0, 8.1) x32

перем ВесовойИндикатор;

Процедура ПриОткрытии()
  ЗагрузитьВнешнююКомпоненту("C:\GetWeight.dll");
  // ВесовойИндикатор = СоздатьОбъект("AddIn.GetWeight");         // для 1С 7.7
  ВесовойИндикатор = Новый("AddIn.GetWeight");                    // для 1С 8.0 8.1
	
  Если Не ВесовойИндикатор.Подключиться("localhost", 8810)  //английский вариант: .Connect("localhost", 8810)
  Тогда
    Сообщить("Не могу подключиться к серверу GetWeightSrv.");
    Возврат;
  КонецЕсли;        
  
  Сообщить("Подключаемся к серверу...");
КонецПроцедуры

Процедура КнопкаВыполнитьНажатие(Кнопка)
  Если Не ВесовойИндикатор.СерверПодключен()  
  Тогда
    Сообщить("Сервер Не Подключен.");
    Возврат;
  КонецЕсли;
  
  Если Не ВесовойИндикатор.ИндикаторПодключен()  
  Тогда
    Сообщить("Индикатор Не Подключен.");
    Возврат;
  КонецЕсли;        

  Если ВесовойИндикатор.ДвижениеНаПлатформе()  
  Тогда
    Сообщить("Движение На Платформе.");
    Возврат;
  КонецЕсли;        
  
  Сообщить(ВесовойИндикатор.Вес());
КонецПроцедуры

Процедура ПриЗакрытии()
  ВесовойИндикатор.Отключиться();
  Сообщить("Закрываем соединение с сервером...");
КонецПроцедуры
