Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.22;
Скачать: CL | DM;

Вниз

Печать на необычном принтере   Найти похожие ветки 

 
Darth Avenger   (2007-02-27 13:31) [0]

Такой вопрос - есть richedit, из него печатается произвольный текст (в кирилице). Печатаю так:

AssignFile(lst,"COM6");
Rewrite(lst);
sc:=0;
for sc:=0 to rzrichedit1.Lines.Count-1 do
writeln(lst,rzrichedit1.Lines[sc]);
writeln(lst,#10#12);
System.CloseFile(lst);


1. Печатается абракадабра в кирилице, хотя таким способом латиница печатается хорошо.
2. Из winword (даже из notepad :)) кирилица печатается хорошо.
3. Принтер нестандартный - термопринтер для чеков Posiflex.

Как быть? Заранее благодарен за ответы!


 
Сергей М. ©   (2007-02-27 13:34) [1]


> Как быть?


Для начала изучить док-цию на принтер в части интерфейсов программного взаимодействия с ним. Там и примеры д.б. по идее.


 
MBo ©   (2007-02-27 13:40) [2]

преобразуй кодировку OemtoChar или CharToOem, в зависимости от того, на какую рассчитан принтер


 
Desdechado ©   (2007-02-27 14:03) [3]

драйвер?


 
Darth Avenger   (2007-02-27 14:10) [4]

Спасибо всем! Проблему решил так:

Printer.BeginDoc;
Printer.Canvas.TextOut(0,0,"Русский текст");
Printer.EndDoc;

Не совсем удобно, не совсем richedit, но мне подходит :)


 
Тфьу   (2007-02-27 14:12) [5]

А самое главное медленно, и жрет кучу ресурсов...



Страницы: 1 вся ветка

Текущий архив: 2007.04.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.03 c
3-1170269416
Ёжик
2007-01-31 21:50
2007.04.22
Владелец хранимок и таблиц


15-1175255744
antonn
2007-03-30 15:55
2007.04.22
вопросик по php/html


2-1175510625
Cara
2007-04-02 14:43
2007.04.22
Поменять расширение.


1-1172734351
Алексей_666
2007-03-01 10:32
2007.04.22
Delphi 7,компонент TdxMemData - при запуске приложения вылет


3-1170747668
RomanH
2007-02-06 10:41
2007.04.22
SQL-запрос