Скачать: CL | DM;

Как работасть с принтером?   Найти похожие ветки 

← →
НВ   (2003-11-26 14:25) [0]

Задача такая
Вывод просто текста из мемо на сетевой матричный Epson.
пытался сделать так:


procedure
var TF : TextFile;
i : integer;
begin
assignprn(TF);
rewrite(TF);
for i:=0 to Memo.Lines.Count -1 do
writeln(TF,Memo.Lines.Strings[i]);
end;


во первых
печать начинаестся только после того как я закрою приложение
ВОПРОС1: как печатать не выходя из программы?

во вторых
печать идет,как я понял, на дефолтовый принтер
ВОПРОС2: как изменить принтер?

в третьих
Все настройки встроеных шрифтов, которые выставляються пимпочками на принтере, улетают и печатаеться все каким-то виндовским шрифтом
ВОПРОС3: Как печатать встроеными шрифтами?

Ну а вообще мне нужно печатать ТХТ быстро и так как он смотрится в ДОСе, т.е. сохранять постоянную ширину символов. И если у вас, уважаемые мастера, есть другое решение для быстрой и красивой печати простого текста, то прошу поделиться

---

← →
panov ©   (2003-11-26 15:15) [1]

1. System.CloseFile(TextFile) после печати.
2. Printer.PrinterIndex
3. Использовать ESC-последовательности для управления выводом н печать для онкретного принтера.

---

← →
Геннадий ©   (2003-11-28 00:10) [2]

Используй переменную Printer (uses Printer). Так ты и принтер выберешь, и шрифт задашь и печать начнётся когда ты дашь команду...

---

← →
hooky-mars   (2003-12-02 19:24) [3]

Printer.Fonts.Text:="Courier";
Таким макарием устанавливается шрифт? Еслитак то помогло не намтого, лишь границы стали по красивше

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c