Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Исходники Форум Информер Страны мира
   Принтеры и Печать    >>    prnfltr
   
 
 Особенности печати на LaserJet из среды BP   Виктор Вагнер 18.10.1996

Исправления в Борландовсом модуле PRNFLTR для правильной печати русских букв на лазернике



1k 
 

From: "Victor B. Wagner" <vitus@agropc.msk.su> Subject: Печать на LaserJet с синтаксическими выделениями и русские буквы Date: 18 Oct 1996 20:42:14 +0400 Может быть, кому-то приходилось сталкиваться с такой проблемой: при печати на HP LaserJet из среды Borland Pascal пропадают русские буквы в комментариях и текстовых константах и/или в конце работы принтер выкидывает пустую страницу. Мы у себя эту проблему решили следующим образом: В исходном тексте PRNFLTR, который входит в дистрибутив BP 7.0 мы обнаружили 1) Команды смены шрифта, завязанные на Symbol Set. 2) В качестве строки деинициализации принтера на него передается chr(12) (FormFeed), который выкидывает страницу безотносительно к наличию данных в буфере. Это лечится следующим образом: Строки с 125 по 133 заменяются на: { HP LaserJet code definition } HPInit = #27'E'#27'(3R'#27'(s0p10.00h12.0v0s0b3T'; HPItalic = #27'(3R'#27'(s0p10.00h12.0v1s0b3T'; HPNoItalic = #27'(3R'#27'(s0p10.00h12.0v0s0b3T'; HPBold = #27'(3R'#27'(s0p10.00h12.0v0s3b3T'; HPNoBold = #27'(3R'#27'(s0p10.00h12.0v0s0b3T'; HPULine = #27'&dD'; HPNoULine = #27'&d@'; Эти команды тоже завязаны на набор символов, но используют русские шрифты из SIMM для HP LaserJet4p (если кто знает набор команд не меняющий текущего шрифта, и работающий независимо от русификации - поправьте меня) строка 162 (определение Postamble в константе LaserJetCodes) заменяется на: Postamble: #27'%-12345X'#27'E'#27'%-12345' Вот в этой конструкции я уверен абсолютно (кстати, в Preamble, точнее HPInit борландовцы поставили ту же самую ESC E). --------------------------------------------------------------------------- Phone: 7(095)230-80-61 Victor B. Wagner Fax: 7(095)230-80-42 Dokuchaev Soil Institute EMail: vitus@agropc.msk.su Pyzhevsky lane, 7 Moscow,109017 Russia