想做一个票据打印程序!希望大家能给我一点思路!(100分)

  • 主题发起人 gladjing
  • 开始时间
G

gladjing

Unregistered / Unconfirmed
GUEST, unregistred user!
不知道该从哪下手!需要做些什么!谢谢 ~[:)]
 
>>从哪下手
先别下手。去找相同软件的盗版或正版,说明书也可以,看看人家是怎么做的,再说。
 
用CELL组件
 
直接画
在ONNEEDDATA事件中写代码
 
继续。[:D]
 
用FAST REPORT
 
我做过,用 delphi 自带的打印控件就很好使的,没有什么特别的地方,就是在设置纸张的时候注意一下就可以了!
 
那怎么来定位字的位置呢?谢谢[8D]
 
做成所见既所得的?[?]
 
用Fast Report或Quick Report 都可以。
扫描一张票据,让它打印出来和真实的票据一样大小。
用这张票据的Image做背景,再添加相应的字段控件到票据空白处。
打印时让这个Image不打印,这样可以套打很精确。
 
做到全部自定义可用Quickreport做每个数据字段的位置自定义
 
我先试一下。:)
 
这是收费站的收费发票打印程序,不知适用不?
(打印票据程序)
VAR
lpt :TextFile;
begin
AssignFile(lpt,'LPT1');
ReWrite(lpt);
Write(lpt,' '+'1'+' '+'61312');//打印车道号、工号
Write(lpt, #10+#10+#10);
//打印机换行
Write(lpt,' '+'二类车'+' '+'10元');//打印车型、收费金额
Write(lpt, #10+#10);
//打印机换行
Write(lpt,' '+datetostr(date));//打印日期
Write(lpt, #10+#10+#10);
//打印机换行
Write(lpt,' '+timetostr(time));//打印时间
Write(lpt, #10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10+#10);
//打印机换页(#12)
CloseFile( lpt );
end;
 
用eReport控件
 
汗 ~~
我还是概念不清楚。
用image做背景打印的时候是打印窗体了?
怎么用Quick Report?
不好意思。有没有人能具体的说一说?谢谢 ~
 

Similar threads

D
回复
0
查看
920
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
顶部