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

Вниз

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

← →
vladimir_12   (2002-03-19 09:11) [0]

Здравствуйте. Помогите с проблемой. Надо печатать некий текст на матричный принтер в текстовом режиме (как в ДОС). Как это сделать?

---

← →
Song ©   (2002-03-19 09:16) [1]

Можно выводить текст на канву принтера через TextOut, но в Вашем случае, я думаю, проще так:

Var ff:TextFile;
...

AssignPrn(ff);
ReWrite(ff);
try
WriteLn(ff,"test");
finally
CloseFile(ff);
end;


---

← →
vladimir_12   (2002-03-19 09:19) [2]

нее... Так он печатает в графическом режиме, это первое, что я попробовал

---

← →
Song ©   (2002-03-19 09:21) [3]

Вы не правы, Владимир, но спорить желания нет.
Скажу одно: графически печать выводится на TPrinter.Canvas

---

← →
dolmat ©   (2002-03-21 09:22) [4]

Var ff:TextFile;
...

Assignfile(ff,"prn"); либо "lst" либо "LPT1 "
ReWrite(ff);
WriteLn(ff,"test");
CloseFile(ff);
end;
Только в очередь не ставвит. а так печатает

---

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

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

Наверх

Память: 0.47 MB
Время: 0.012 c