| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Печать в текстовом режиме
vladimir_12 © (2002-03-19 09:11:00)Здравствуйте. Помогите с проблемой. Надо печатать некий текст на матричный принтер в текстовом режиме (как в ДОС). Как это сделать?
dolmat (2002-03-21 09:22:00) [1]Var ff:TextFile;
...
Assignfile(ff,"prn"); либо "lst" либо "LPT1 "
ReWrite(ff);
WriteLn(ff,"test");
CloseFile(ff);
end;
Только в очередь не ставвит. а так печатает
Song (2002-03-19 09:21:00) [2]Вы не правы, Владимир, но спорить желания нет.
Скажу одно: графически печать выводится на TPrinter.Canvas
vladimir_12 (2002-03-19 09:19:00) [3]нее... Так он печатает в графическом режиме, это первое, что я попробовал
Song (2002-03-19 09:16:00) [4]Можно выводить текст на канву принтера через TextOut, но в Вашем случае, я думаю, проще так:
Var ff:TextFile;
...
AssignPrn(ff);
ReWrite(ff);
try
WriteLn(ff,"test");
finally
CloseFile(ff);
end;
| |
