День добрый. Стал вопрос о печати на матричный принтер. Нужна большая скорость. Я знаю только один вариант, создать текстовый файл, и отправить его на притер. еще варианты есть. Заранее спасибо.

Еще варианты есть. Печатать прямо в порт LPT, если найдешь.

Постой, я что, отстал от жизни? И уже появились матричники, печатающие по 10-20 страниц в минуту? Или жаба душит лазерник купить? Kyocera, например, в последнее время неплохие принтеры делает, и экономные. 10 тыс. листов на одной заправке (в экономном режиме).

(2)попробуй на лазарнеки ввести протоклирование действий пользователя в системе

(3) сопсна вопрос - а нафига?

(2)ты не только "отстал", ты ее, похоже, и не догонял...
допустим, тот же DFX-9000 имеет скорость печати 1500 символов в секунду. 15 страниц в минуту... причем при этом может печатать сразу на рулонной самокопирке (считай, еще умножить на 2). я уж не говорю про  крутые матричники...
(4) например, протоколировать события в ОПС... Чтоб не было возможности "подкорректировать".

(5) 2. а чё, лить логи в стороннюю защищённую базу (можно даже на другой компе) не проще?

(6)логи ... в отличии от бумажных носителей, заверенных подписями и печатями, не являються в доказательством в суде ... тем более логи легко подделать ...

(7) банки?

(8)ну да ... идея была закоммуниздина у банков ... но использовалась в оптво-розничной торговле ... дабы управляющие не могли навариваться на скидках

(9) каким образом протоколирование противодействует навариванию управляющими на скидках?

Во-первых, цена матричного отпечатка получается дешевле все (правда сейчас ей конкуренцию составляют термопринтеры, но у них свои недостатки).
Во-вторых, матричный принтер позволяет напечатать сразу несколько экземпляров, что позволяет сохранить журнал операций на рулоне (который сложно подделать).
В-третьих, печать на матричном принтере идёт построчно, что исключает потерю информации в процессе накопления страницы (этой особенностью обладают ещё и струйные принтеры, но там расплывающиеся чернила).
В четвёртых, матричные принтеры абсолютно не требовательны к качеству бумаги, тогда как для других типов принтеров требуется специальная бумага.
в пятых, отпечаток матричного принтера невозможно стереть с бумаги так, чтобы это было невозможно определить (для струйных и лазерных существуют способы).
Быстрее матричного принтера оказывалось только барабанное АЦПУ, но там ограниченный набор символов (современные лазерные принтеры, конечно печатают быстрее, в расчёте на лист, но они совершенно не умеют печатать на рулонах - точнее сказать - недопустима остановка рулона в момент печати).

(10)тупо и банально позволяет определить что покупал клиент в момент первоначального проведения документа ...

(11) У хороших матричников только один недостаток, с которым я имел несчастье познакомиться, хорошие (подчеркиваю действительно хорошие) матричные принтеры с убойной скоростью печати 15-20 страниц в минуту очень мало кто умеет ремонтировать, особенно на периферии, где такого добра днем с огнем не сыщешь. Пару месяцев решал вопрос с принтером который жевал ленту, штук пять контор обошел, все бестолку. Может в нерезиновой с этим попроще...

Да, только теплый ламповый звук является кошерным...
Кто этого не понимает - просто лохи.

(1)У меня 300 епосоны. Они универсалы. У них есть COM и LPT. И то и то у меня есть. COM предпочтительней.
Печать чеков, логов. Преимущество рулонная подача, построчная печать, высокая скорость, если встроенные шрифты использовать.

(13) Если жевал - то иголочка в головке не возвращается на место и просто протыкает ленту - стандартная неисправность - обычно меняют головку целиком - конечно - можно разбирать и ремонтировать - но вспоминается, как страшный сон, так как работа ювелирная, а результат далёк от стопроцентного.
P.S. обычно новая головка от пятидесяти до ста баксов.

Да нехрена. Я этих головок перебрал. В свое время кучу. Самое фиговое когда катушка горит. Но я даже их умудрялся перематывать. Не со всеми фишка проходила, но довольно часто успешно. А принтеры эти, б\у у мне тут по 15-20 баксов. Валом.

(0) Скорее всего варианты есть только для создания такого текстового файла.

(0) ну типа привет из далёкого прошлого:

   ТПрн=СоздатьОбъект("Текст");
   ТПрн.Очистить();
   ТПрн.КодоваяСтраница(0);

...................................

ТПрн.ДобавитьСтроку(AnsiToOem(chr(15)+"                  ОПЛАТА ПРОИЗВОДИТСЯ В ТЕЧЕНИИ 3-х ДНЕЙ СО ДНЯ ВРУЧЕНИЯ                            Приложение №1
       |                                       к Правилам ведения журналов учета полученных и выставленных счетов-фактур,
       |                                      книг покупок и книг продаж при расчетах по налогу на добавленную стоимость,
       |                        утвержденным постановлением Правительства РоссийскойФедерации  от 2 декабря 2000 г. N 914
       |                          (в редакции постановлений Правительства Российской Федерации от 15 марта 2001 г. N 189,
       |                                                             от 27 июля 2002 г. N 575, от 16 февраля 2004г. №84)"));    
   
ТПрн.ДобавитьСтроку(AnsiToOem("                  СЧЕТ-ФАКТУРА "+СокрЛ(НомерДок)+" от "+Формат(ДатаДок ,"Д (0)ДДММММГГГГ") ));

ТПрн.ДобавитьСтроку(AnsiToOem(ПечПоставщик));
ТПрн.ДобавитьСтроку(AnsiToOem(ПечАдресПоставщика));

........................................

ТПрн.ДобавитьСтроку(AnsiToOem("Директор филиала 'Бла-Бла-Бла'                                  "+ПадежП(Клиент.ДолжностьРуководителя,2) ));
ТПрн.ДобавитьСтроку(AnsiToOem(" "));
ТПрн.Записать("c:\1sensf.txt");
ФС.КопироватьФайл("c:\1sensf.txt","lpt1:",0);
ФС.УдалитьФайл("c:\1sensf.txt");

(19) да можно и таблицу в текст конвертить. не проблема. вплоть до отрисовки рамок псевдографикой.
сложности там только во флаге выравнивания в ячейке.

(2) а разве их не стало? Лет 15 назад, когда работал в банке там стоял DECовский матричник, работал тихо как пулемёт вулкан (поэтому стоял в коридоре а не в кабинете), но скорость... не то что какие-то отстойные лазерники!

(21) DEC, насколько помн, принтеров не выпускал...

(20) не, ну не приводить-же мне весь код!
вот типа ещё кусок даже без псевдографики (чёрточки и воскл. знаки, но на любом печатало однохренственно):

ТПрн.ДобавитьСтроку(AnsiToOem("                  АКТ ПРИЕМКИ-ПЕРЕДАЧИ ВЫПОЛНЕННЫХ РАБОТ" ));
ТПрн.ДобавитьСтроку(AnsiToOem("                            от "+Формат(ДатаДок ,"Д (0)ДДММММГГГГ") ));
ТПрн.ДобавитьСтроку(AnsiToOem(" Продавец: "+Фирма.Грузоотправитель+"
       | именуемое в дальнейщем Исполнитель, в лице директора Ивано В.В.,с одной стороны и
       | Покупатель "+Клиент.ПолнНаименование+"
       | именуемое в дальнейшем Заказчик, в лице "+?(ПустаяСтрока(Клиент.ДолжностьРуководителя)=0,ПадежП(Клиент.ДолжностьРуководителя,2)+" "+Падеж(Клиент.ФИОДиректора,2),"_____________________")+", с другой стороны        
       | составили настоящий акт о том, что Исполнитель оказал услуги за "+ПериодСтр(НачМесяца(ДатаДок),КонМесяца(ДатаДок))+" по договору № "+Строка(Клиент.Код)+" в объеме:"));
ТПрн.ДобавитьСтроку(AnsiToOem("___________________________________ ____ __________ ____________________________"));
ТПрн.ДобавитьСтроку(AnsiToOem("         Наименование              !Стоимость услуг! Сумма    ! Стоимость услуг
                             |        оказанных услуг            !  без налога   ! налога   !всего с налогом"));
ТПрн.ДобавитьСтроку(AnsiToOem("___________________________________!_______________!__________!_________________"));

(22)но продавал под своей маркой, за года 3 эксплуатации у него кроме расходников была только 1 поломка - шестерёнка, 150$ что-ли...

(23) Я не о малом количестве кода.
я о том, что можно разбирать сформированную таблицу через ПолучитьОбласть(), и на основе этого формировать текстовый файл.

(25) в клюшках?

(22)кста, получается выпускал до 1997 http://www.osp.ru/cw/1997/31/22820/

(27) Не знал, что это их подразделение и торговая марка...

Но это все опять через создание файла. Это я умею.
ТПрн.Записать("c:\1sensf.txt");
ФС.КопироватьФайл("c:\1sensf.txt","lpt1:",0);
ФС.УдалитьФайл("c:\1sensf.txt");

Напрямую можно как-то отправить?

Народ не спать. Гоните варианты.

(30) ну, компоненту напиши :-)

внематочно читать про метод печать объекта таблица

(30) Можно леХко сделать в VBS через FileSystemObject. Открывать файл на устройстве PRN: COM: LPT1: или LPT2: и писать внего напрямую.
Есть правда одна фишка (относится к Epson-ам FX и LX) начинают непосредственно вывод на бумагу либо при заполнении на сколько-то процентов памяти либо при получении символа ВК-ПС либо Контрол-Зет(всмысле конец файла).

(33)нах

(34) А обосновать?

что

(36) мысль из (34)

(37)прочти (29) и хорошо подумай

(38) Ему хочется напрямую в порт. Без создания файла на ХаДеДе.
И что не так?

+(39) Или базар за то, что предлагается работать с устройством, как с файлом? Так это же не совсем одно и тоже, что писать в файл, а потом его отправлять на устройство. И даже сильно наоборот.

(40)Наоборот это как? Отправить на устройство, а потом записать в файл?

а записать("prn") что дает ...

Добыл принтер. Ща буду его насиловать.

То ли меня память подводить. То ли я его не так настроил. Но что-то печатает он не быстро.

(44) исходники не помогли? ну тогда справочник по управляющим кодам в руки и вперёд на ускорение!

(44) отправляешь текст или как ?

(44) режим печати скорее всего стоит LQ. ставь draft, и будет щастье...
плс управляющими кодами, или свичами, или настройкой через меню - установить печать в двух направлениях, и т.д и т.п.

copy filename.txt prn

Управляющие коды тоже покурить не мешает. Коды вставляют в начало файла или перед печатью файла отправляют отдельный файл с кодами на принтер

(48) Коды вставляют и непосредственно в текст...
например, "включить удвоенную ширину" или "удвоенную высоту", и ли отключить их...

(49) да-да

Так все победил. Осталось одно проблема. Сто силе в управляющих кодах?
Нужно бумагу подавать немного назад. А то много свободного места, перед началом чека.

http://en.wikipedia.org/wiki/ESC/P

Матричный принтер печатаю через файл. Все зашибись, но что конец чека подъехал к обрыву надо добавить несколько пустых строк, и получается перед каждым следующим чеком полоса пустой бумаги
Надо ее как-то назад ее откатить

ау

уа

(55)Печатай в файл с именем lpt. А так матричный принтер видит конец файла и делает прогон. Можешь, конечно почитать про управляющие символы в инструкции по принтеру. И их всунуть в начало файла.

Он не делает прогон бумаги. Прогон бумаги делаю я напихав в конец файла пустых строк.

(57)Тогда не понял проблемы.

Проблема в том, в начале следующего чека появляется пустая область. Хотелось бы откатит назад этот кусочек.

брррр
Если ты его специально создаёшь, тогда зачем откатывать?
Кстати, печатаешь-то на рулонной бумаге?

Бумагу жалко. Да и не красиво выглядит. Я эстет.
Печатаю я на рулоне.

(61)Я так и не понял, для чего тебе нужны пустые строки?

(59) А ты просто печатай там шапку следующего чека (она, как правило статична), затем команда "отрез", в результате в принтере остается кусочек с шапкой, а следующий чек уже без шапки. Т.е. шапку чека всегда в конце печатай.

(63)Опа. А это идея.Спасибо.
(62)Чтоб низ чека подполз к линии обрыва.

Притер Epson 300

Вот тут есть описалово с системой команд.
http://support.epson.ru/manual_list.asp?product=115

Или здесь
http://www.office-world.ru/catalog/printers/matrix/item_1000727.html

А еще я когдато на бейсике чтобы узнать какой код что делает с принтером юзал цикл с выводом на принтер
ну в нашем случае это бы выглядело гдето так:
Процедура Сформировать()
   Текст = СоздатьОбъект("Текст");
   ИмяФайла = КаталогИБ()+"Проверка.txt";  
   Для а = 1 По 30  Цикл
       Стр =Симв(а);
       Текст.ДобавитьСтроку(Стр);  
       Стр = "Съешь этих мягких французских булок " + а
       Текст.ДобавитьСтроку(Стр);  
   КонецЦикла;
   Текст.Записать(ИмяФайла);    
   ФС.Копироватьфайл(ИмяФайла,"prn",1);
КонецПроцедуры
посмотришь какая "а" что делает.

Стр = "Съешь этих мягких французских булок " + а;
точку с запятой пропустил

Спасибо за идеи. Но это я все знаю.

Смотри в сторону LinePrinter типо таких: http://www.genicom.com/Pages/Products/line_matrix_2-col_dyn.aspx?id=7352

1500 - 2000 строк в минуту. Скока будет в страницах? И драйверы под все винды есть :)

Притер Epson 300 у мнея их десяток.

(72) Есть парочка мануалов по командам (5 МБ), сбросить на почту?

На русском? По аглийси есть на сайте епсон.

(74) + на ангельском :) я по нему и настраивал сначала через тест файл: (Far + hiew32)

(75)Такого добра валом. Вот от пример бы не отказался.

(76) Упр. коды для EPSON 890FX (под 7-ку писал), что делают:
инициализация + уставнока CP1251 + ультра турбо режим :) (USD)
       Массив[1] = 27;
       Массив[2] = 64;
       Массив[3] = 27;
       Массив[4] = 40;
       Массив[5] = 116;
       Массив[6] = 03;
       Массив[7] = 00;
       Массив[8] = 00;
       
       Массив[9] = 49;
       Массив[10] = 00;
       Массив[11] = 27;
       Массив[12] = 116;
       Массив[13] = 00;
       Массив[14] = 27;
       Массив[15] = 121;
       Массив[16] = 02;
       
       Массив[17] = 27;
       Массив[18] = 80;
       Массив[19] = 27;
       Массив[20] = 120;
       Массив[21] = 00;
       Массив[22] = 27;
       Массив[23] = 70;
       Массив[24] = 18;
       
       Массив[25] = 27;
       Массив[26] = 84;
       Массив[27] = 27;
       Массив[28] = 53;
       Массив[29] = 27;
       Массив[30] = 72;
       Массив[31] = 27;
       Массив[32] = 119;
       
       Массив[33] = 00;
       Массив[34] = 27;
       Массив[35] = 119;
       Массив[36] = 00;
       Массив[37] = 27;
       Массив[38] = 97;
       Массив[39] = 00;
       Массив[40] = 13;
       Массив[41] = 10;

+(77) Отдельно печать штрих кода:

       МассивШК[1] = 27;
       МассивШК[2] = 40;
       МассивШК[3] = 66;
       МассивШК[4] = 18;
       МассивШК[5] = 0;
       МассивШК[6] = 0;
       МассивШК[7] = 2;
       МассивШК[8] = 0;
       МассивШК[9] = 32;//125
       МассивШК[10] = 0;
       МассивШК[11] = 3;

Потом сам код