精确定位打印 你自己不是写出来了吗?有什么问题吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 x,y的值为多少,莫非是打出边界了? 有问题?还是你想教我如何打印?如果是后者的话,干吗那么客气,还给分数! 根据打印机的分辨率来定位。 Printer.BeginDoc; with Printer do begin Canvas.MoveTo(0,20); Canvas.LineTo(150,20); Canvas.MoveTo(150,20); Canvas.Lineto(150,70); Canvas.MoveTo(0,20); Canvas.LineTo(0,70); Canvas.MoveTo(0,70); Canvas.Lineto(150,70);// Canvas.TextOut(40,30,'程序员'); Canvas.TextOut(x,y,'程序员'); ????? end;Printer.Enddoc; 请有经验的大虾们推荐能将数据库中数据生成PDF文件和图片文件的控件. idftp递归下载的问题 关于 Tstrings类型的问题 怎样将两个时间类型相减最后得到的结果还是时间型?请教! 用adoquery 怎么实现查询呢,sql 语句应该怎么写,? SQL语句? Crystal Report如何直接打印不预览? 查询问题,急急 sql问题 如何开始com和dll编程? 谁知道Delphi4.0 c/s版本的注册码?50分 MDI程序中对一个CHILD FORM中的控件属性修改的问题
如果是后者的话,干吗那么客气,还给分数!
with Printer do
begin
Canvas.MoveTo(0,20);
Canvas.LineTo(150,20);
Canvas.MoveTo(150,20);
Canvas.Lineto(150,70);
Canvas.MoveTo(0,20);
Canvas.LineTo(0,70);
Canvas.MoveTo(0,70);
Canvas.Lineto(150,70);
// Canvas.TextOut(40,30,'程序员');
Canvas.TextOut(x,y,'程序员'); ?????
end;
Printer.Enddoc;