Собственно проблема следующая. Есть АСПД Штрих-Light, есть 1С ТИС
в АСПД (читай ФР) есть метод PrintString(), который печатает StringForPrinting="", АСПД для печати чеков мы не используем (когда то непонятно зачем купили) и нужно чтобы он выводил просто строки через printString(), соб-нно проблема как собрать в кучку поля например Поле1, Поле2, Поле3, Поле-n т.е. в список значений и циклом пока есть эти значения передавать в StringForPrinting=""? Может что то путаю, но оччень нужно чтобы печатал эти строчки
в АСПД (читай ФР) есть метод PrintString(), который печатает StringForPrinting="", АСПД для печати чеков мы не используем (когда то непонятно зачем купили) и нужно чтобы он выводил просто строки через printString(), соб-нно проблема как собрать в кучку поля например Поле1, Поле2, Поле3, Поле-n т.е. в список значений и циклом пока есть эти значения передавать в StringForPrinting=""? Может что то путаю, но оччень нужно чтобы печатал эти строчки
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Вызывайте функцию, передавая строки из списка значений:
Функция ПечататьСтроку(Объект, Пароль, Стр, ПолужирныйШрифт = 0, ТипШрифта = 0, ПечЧек=1, ПечКонтр=0);
Объект.Password = Пароль;
Объект.UseReceiptRibbon = ПечЧек;
Объект.UseJournalRibbon = ПечКонтр;
Объект.StringForPrinting = Стр;
Если ПолужирныйШрифт = 1 Тогда
Объект.PrintWideString();
ИначеЕсли ТипШрифта = 0 Тогда
Объект.PrintString();
Иначе
Объект.FontType = ТипШрифта;
Htp = Объект.PrintStringWithFont();
КонецЕсли;
Если Объект.ResultCode <> 0 Тогда
ОписаниеРезультата = ПолучитьОписаниеРезультата(Объект);
Возврат 0;
КонецЕсли;
Возврат 1;
КонецФункции // ПечататьСтроку()
Функция ПечататьСтроку(Объект, Пароль, Стр, ПолужирныйШрифт = 0, ТипШрифта = 0, ПечЧек=1, ПечКонтр=0);
Объект.Password = Пароль;
Объект.UseReceiptRibbon = ПечЧек;
Объект.UseJournalRibbon = ПечКонтр;
Объект.StringForPrinting = Стр;
Если ПолужирныйШрифт = 1 Тогда
Объект.PrintWideString();
ИначеЕсли ТипШрифта = 0 Тогда
Объект.PrintString();
Иначе
Объект.FontType = ТипШрифта;
Htp = Объект.PrintStringWithFont();
КонецЕсли;
Если Объект.ResultCode <> 0 Тогда
ОписаниеРезультата = ПолучитьОписаниеРезультата(Объект);
Возврат 0;
КонецЕсли;
Возврат 1;
КонецФункции // ПечататьСтроку()
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот