Delphi编写的打印程序。
新机器主板上没有串口LPT1,需要加一个PCI卡转换为LPT1串口,但加卡转换后,无法正常打印。
提示:File not found请各位帮忙,谢谢。打印程序如下:
procedure TDataModule1.myprint(txt:string);
var
  F:TextFile;
begin
    AssignFile(F,'LPT1');
    ReWrite(f);
    Writeln(F,txt);
    Close(F);
end;