一个打印的非常简单的问题,如何打印edit1->text的内容 (100分)

  • 主题发起人 主题发起人 ouwx
  • 开始时间 开始时间
O

ouwx

Unregistered / Unconfirmed
GUEST, unregistred user!
一个打印的非常简单的问题,用户输入edit1->text的内容,就打印
如何edit1->text的内容传到打印机打印,可以在页面的任何地方打印
我很菜,但是我很及,希望你能够救我
 
你问的不是很清楚.什么叫在页面的任何地方?请说的详细一点
 
就是打印的时候可以自己定位在纸上任何地方打印,这不是关键.
我主要是想问如何打印edit1->text
 
好象没什么意义,不过可以调用API实现.
 
Uses Printers;
....
printer.begin
doc;
y:=y0;
x :=x0;
with printer.canvasdo
begin
font.size := 12;
//指定字体大小
font.name := '宋体';
//指定字体大小
y :=y+ textheight(s);
s :=Edit1.text;
textout(x, y, s);
end;
printer.enddoc;
//x0,y0为你打印的位置,应调试确定。
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=936774
看看提问的智慧吧!
 
lins兄:用你的方法打印后就会换页。有没有什么方法打印一行,后换行而不换页。
 
要继续打印就不要写
printer.enddoc;
完成一次打印:
printer.begin
doc;
printer.enddoc;
 
如果不用Printer.enddoc.好么它就不会打印。只有当调用Printer.enddoc打印机才开始打印。
这么问题怎么解决呢?谢谢!
 
完成一次打印必须:
printer.begin
doc;
//要打印的内容
....
....
printer.enddoc;
如果是一页,即走完该页停机,除非出现故障,否则不能停在纸的某个位置。
 
API函数可以实现停在纸的某个位置,但只能针对文字,对图形无效。
 
后退
顶部