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

вывод на принтер   Найти похожие ветки 

← →
Nekto   (2004-03-10 19:58) [0]

Вечер добрый!!!
Кто работал с принтером из дельфы?
Проблема такая: имеем TMemo, TКнопка, TPrinterDialog.
Нужно бросить инфу из мемо на принтер.
В хелпе предлагают использовать AssignPrn, но я предполагаю, что так будет связь не с принтером, а с LPT1. А если принтера 2, или он USB??? Из PrinterDialog надо получить Хендл, а дальше как-то в него Write. Кто уже делал это, покажите как?

---

← →
КомофОнСамый   (2004-03-10 20:01) [1]

а можно кинуть на форму TQuikReport, на него TQMemo в область Title, и при нажатии кнопки Печать - вывести TQuickRep.

а оттуда как хошь и что хошь печатай. правда ехе-шник распухнет

---

← →
Тимохов ©   (2004-03-10 20:03) [2]

пользуйтесь модулем printers и объектом printer

---

← →
YuRock ©   (2004-03-10 20:04) [3]

Можно воспользоваться TPrinter (лучше для графической печати).

Но у вас текстовая. Значит, скорее всего, можно сделать так:
1. Узнать имя порта, к которому подключен принтер (необходимый Вам или выбранный пользователем);
2. TMemo.SaveToFile(<полученное имя порта>);

---

← →
Nekto   (2004-03-10 21:30) [4]

Отсюда второй вопрос На .......... PrinterDialog и Что из него можно выжать.
Он похож на Open/Save Dialog. Из них мы можем получить путь, а из принтера??? (А из принтера мы должна получить его Хендл.)

---

← →
Гиричев Руслан ©   (2004-03-10 22:10) [5]

if PrinterSetupDialog1.Execute then memo1.Print;точно не помню, либо:if PrinterSetupDialog1.Execute then memo1.lines.Print;
Вместо PrinterSetupDialog1 вставь PrinterDialog1

---

← →
Nekto   (2004-03-10 22:54) [6]

У memo Нет Print и Lines.Print.
Кроме того на какое устройство?

---

← →
Nekto   (2004-03-11 22:01) [7]

Ну что, никто с принтерами не работал?!?

Поменял мемо на RichEdit. У него есть св-во Print. Выводит на принтер весь поток, даже на сетевой.

Но такая фигня получилась. Сетевой принтер HP LJ 6P. На нем все отлично. Локальный Canon BJC-240. На нем выводит не тем шрифтом, т.е. не курьером, а мне нужен моноширный шрифт.

Есть предложния?

---

← →
Nekto   (2004-03-11 23:50) [8]

Поменял Courier на Courier New. Получилось!!!

---

← →
Zacho ©   (2004-03-12 00:09) [9]

2 Nekto: а все-таки, справку по TPrinter читать не пробовал ? Там и примеры есть, вообще-то ..

---

← →
Nekto   (2004-03-13 00:54) [10]

2 Zacho:
Пробывал, там не то, что мне надо.

---

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

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



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