Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.03 c
4-1074871367
Phrodo
2004-01-23 18:22
2004.04.04
Информация об открытых хэндлах процесса


11-1057266293
Stargazer
2003-07-04 01:04
2004.04.04
И вновь TBitBtn - преобразование цветов


14-1078921496
Marina_S
2004-03-10 15:24
2004.04.04
МНК - где найти?


8-1068235153
Delphi5.01
2003-11-07 22:59
2004.04.04
[Error] DirectDraw.pas(173): Type IDirectDrawSurface needs fina


6-1075397579
laumer
2004-01-29 20:32
2004.04.04
Как отловить момент окончания щтправки потока