writeln 如何向打印机发送十六进制指令 打印小票时,需要切割小票,需要发送一个十六进制的指令给打印机,该如何实现? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 assignfile(f,'lpt1:');tryrewrite(f);writeln(f,chr(27) chr(112) chr(0) chr(50) chr(200));//初始化rewrite(f);writeln(f,#27#64 '停车收费单');writeln(f,#10'卡号:' LabCardNo.caption);writeln(f,'进入日期:' LabInDate.caption);writeln(f,'进入时间:' LabInTime.caption);writeln(f,'离开日期:' LabOutDate.caption);writeln(f,'离开时间:' LabOutTime.caption);writeln(f,'共停车:' LabHour.caption ' ' LabMin.Caption);writeln(f,'停车费:' labfee.caption #10#10#10#10#10#10);finallyclosefile(f);end; VARlpt :TextFile;BEGINAssignFile( lpt, 'LPT1' );ReWrite( lpt );Write( lpt, '打印测试' );Write( lpt, #10 ); //打印机换行CloseFile( lpt );END; 打印小票的时候能不能打印商场的logo呢??? 使用打印机的指令画~~~查查小票打印机的esc/pos指令集 delphi 程序问题 sgraph的应用问题 nmudp.dcu文件 如何用indy10 的UDP传输接收记录类型? 购买控件 谁有(BI_RLE8压缩类型)和(BI_RLE4压缩类型)相关资料? 关于vc++和Vc++.net的优劣 哪里有JPEG格式的文章 帮助看一段代码,谢谢! 我用Quick Report打印Table控件中的記錄﹐確只打印了第一條記錄﹐請問如何解決這個問題﹐是否是哪裡設置有問題﹖ DLL中的参数是LPCTSTR,请问如何在delphi中声明和使用? delphi 怎样用web service实现天气预报功能呢
try
rewrite(f);
writeln(f,chr(27) chr(112) chr(0) chr(50) chr(200));//初始化
rewrite(f);
writeln(f,#27#64 '停车收费单');
writeln(f,#10'卡号:' LabCardNo.caption);
writeln(f,'进入日期:' LabInDate.caption);
writeln(f,'进入时间:' LabInTime.caption);
writeln(f,'离开日期:' LabOutDate.caption);
writeln(f,'离开时间:' LabOutTime.caption);
writeln(f,'共停车:' LabHour.caption ' ' LabMin.Caption);
writeln(f,'停车费:' labfee.caption #10#10#10#10#10#10);
finally
closefile(f);
end;
VAR
lpt :TextFile;
BEGIN
AssignFile( lpt, 'LPT1' );
ReWrite( lpt );
Write( lpt, '打印测试' );
Write( lpt, #10 ); //打印机换行
CloseFile( lpt );
END;