![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как работасть с принтером? [D6, Win95/98, Win2k]
НВ © (2003-11-26 14:25:00)
Задача такая
Вывод просто текста из мемо на сетевой матричный 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: Как печатать встроеными шрифтами?
Ну а вообще мне нужно печатать ТХТ быстро и так как он смотрится в ДОСе, т.е. сохранять постоянную ширину символов. И если у вас, уважаемые мастера, есть другое решение для быстрой и красивой печати простого текста, то прошу поделиться
hooky-mars (2003-12-02 19:24:00) [1]
Printer.Fonts.Text:="Courier";
Таким макарием устанавливается шрифт? Еслитак то помогло не намтого, лишь границы стали по красивше
Геннадий (2003-11-28 00:10:00) [2]
Используй переменную Printer (uses Printer). Так ты и принтер выберешь, и шрифт задашь и печать начнётся когда ты дашь команду...
panov (2003-11-26 15:15:00) [3]
1. System.CloseFile(TextFile) после печати.
2. Printer.PrinterIndex
3. Использовать ESC-последовательности для управления выводом н печать для онкретного принтера.