UniScalesLPrint

драйвер вагів з друком етикеток

Користувальницькькі налаштування

Налаштування сайту


comobj_and_nativeapi

Розбіжності

Тут показані розбіжності між вибраною ревізією та поточною версією сторінки.

Посилання на цей список змін

Порівняння попередніх версійПопередня ревізія
Наступна ревізія
Попередня ревізія
comobj_and_nativeapi [2022/10/06 20:39] iserbincomobj_and_nativeapi [2022/10/07 15:37] (поточний) – [Приклади роботи з Драйвером] iserbin
Рядок 5: Рядок 5:
  
 ==== Ініціалізація СОМ-об'єкта в BAF/BAS/1C ==== ==== Ініціалізація СОМ-об'єкта в BAF/BAS/1C ====
-**Якщо ви використовуєте NativeAPI-версію драйвера, то цей пункт пропускайте.**+**Якщо ви використовуєте NativeAPI-версію драйвера, то цей пункт пропускайте. Переходьте заразу сюди: [[comobj_and_nativeapi#ініціалізація_nativeapi-версії_драйвера_в_baf_bas_1c|Ініціалізація NativeAPI]] **
  
 Перш за все потрібно зареєструвати драйвер за допомогою regsvr32. \\  Перш за все потрібно зареєструвати драйвер за допомогою regsvr32. \\ 
-В папці з драйвером є файл: "RegCOM_USLP.cmd". Потрбіно його відкрити в текстовому редакторі, наприклад в "Блокноті", та прописати фактичний шлях до файлів-DLL і зберегти файл:+В папці з драйвером є файл: "**RegCOM_USLP.cmd**". Потрбіно його відкрити в текстовому редакторі, наприклад в "Блокноті", та прописати фактичний шлях до файлів-DLL і зберегти файл: 
 +{{ :init001.png?nolink |}}
  
 +В файлі прописана реєстрація двох одночасно 32 та 64 біт. Часто буває, що 1С запускається і 32 і 64-бітні версії платформ одночасно.
  
 +Після цього потрібно виконати файл "**RegCOM_USLP.cmd**" від імені Адміністратора:
 +{{ :init002.png?nolink |}}
 +Після виконання буде 2 повідомлення про успішну реєстрацію СОМ-об'єктів. Якщо у вас Windows 32 біт, то останне повідомлення буде з помилкою, цю помилку ігноруйте.
 +
 +**Ініціалізація драйвера в 1С:**
  
 Версія платформи 8.х: Версія платформи 8.х:
 <code _1c> <code _1c>
 +//Версія платформи 8.x
 Перем ВагиДрук Экспорт;   Перем ВагиДрук Экспорт;  
  
Рядок 28: Рядок 36:
 Версія платформи 7.7: Версія платформи 7.7:
 <code _1c> <code _1c>
 +//Версія платформи 7.7
 Перем ВагиДрук  Экспорт; Перем ВагиДрук  Экспорт;
 //////////////////////////////////////////////////////////////             //////////////////////////////////////////////////////////////            
Рядок 80: Рядок 89:
   
 КонецПроцедуры КонецПроцедуры
 +
 +</code>
 +
 +
 +
 +==== Приклади роботи з Драйвером ====
 +Подальша робота з драйвером одинакова для всіх версій BAF/BAS/1C, та варінтів реалізацій драйвера.
 +
 +**Приклад очистки бази товарів у вагах:**
 +<code _1c>
 +ВагиДрук.ПодключитьВесыПоEthernet("Scales01", 
 + "192.168.0.28", 
 + 2,    // 1 - CAS CL3000/3500/5000
 + // 2 - CAS CL3000J/3500J/5000J Junior
 + "0000-0000-0000-0000" // Ліцензійний ключ
 + );
 +ВагиДрук.ОчиститьТовары( "Scales01");
 +ВагиДрук.ЗакрытьСоединение("Scales01");
 +</code>
 +
 +**Приклад програмування товарів:**
 +<code _1c>
 +Перем ТекстОшибки;
 +
 +ВагиДрук.ПодключитьВесыПоEthernet("Scales01", 
 + "192.168.0.28", 
 + 2,    // 1 - CAS CL3000/3500/5000
 + // 2 - CAS CL3000J/3500J/5000J Junior
 + "0000-0000-0000-0000" // Ліцензійний ключ
 + );
 +
 +ВагиДрук.ПрограммироватьТоварV1( "Scales01" 
 + ,"Банан8"  // 2.  Назва товару, макс 80 символів.
 + ,008 // 3.  Код товару (часто співпадає з PLU)
 + ,008 // 4.  PLU
 + ,12050 // 5.  Ціна в копійках, ціле число
 + ,10 // 6.  Срок придатності в днях, ціле число
 + ,0 // 7.  Тара в грамах, ціле число
 + ,0 // 8.  0 - ваговий товар, 1 - штучний
 + ,51 // 9.  Номер етикетки
 + ,1 // 10. Номер відділу
 + ,0 // 11. Номер штрих коду, 0 - по замовчуванню
 + ,0 // 12. Номер додаткового повыдомлення
 + ,0 // 13. Номер одиниць вимырювання 
 + );
 +Если 0<>ВагиДрук.ПолучитьОшибку(ТекстОшибки) Тогда Сообщить(ТекстОшибки); Возврат; КонецЕсли;
 +  
 +ВагиДрук.ПрограммироватьТоварV1( "Scales01","Апельсин9",009,009,1405,10,20,0,51,1,0,0,0);
 +Если 0<>ВагиДрук.ПолучитьОшибку(ТекстОшибки) Тогда Сообщить(ТекстОшибки); Возврат; КонецЕсли;
 +
 +ВагиДрук.ПрограммироватьТоварV1( "Scales01","Мандарин10",010,010,1500,0,0,0,51,1,0,0,0);
 +Если 0<>ВагиДрук.ПолучитьОшибку(ТекстОшибки) Тогда Сообщить(ТекстОшибки); Возврат; КонецЕсли;
 +
 +ВагиДрук.ЗакрытьСоединение("Scales01");
  
 </code> </code>
  
  
comobj_and_nativeapi.1665077949.txt.gz · Востаннє змінено: 2022/10/06 20:39 повз iserbin

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki