为什么在我的 Delphi 程序里, 用 QuickRep.print 命令打不出东西来,
(前几天还在 Epson LQ1600 III 中打印正常,但在 Fujitsu 中的平推式针
打中不能打印)
即使用 Quick.preview 命令预览时没错,用预览中的 print 命令也无效.
用 quickRep.print 可以见到打印进程,但打印机只是换行,并不打印.
而用 Delphi /file/print 却可以打印出程序的代码, 写字板也可以
打印出文本文件.
奇怪的是连Delphi的帮助中自带的打印例子(代码如下)也打印不出东西来!
procedure TForm1.Button1Click(Sender: TObject);
var
MyFile: TextFile;
begin
AssignPrn(MyFile);
Rewrite(MyFile);
Writeln(MyFile, 'Print this text');
System.CloseFile(MyFile);
end;
十万火急的事,请大虾们出手解救.