以前的代码并口可以打印,可用USB转接后就不能打印了,请问
该如何修改解决
procedure TFrm.Button1Click(Sender: TObject);
var F: TextFile;
  PDStr: string;
begin
  try
    PDStr := 'Delphi Printer on LPT1' + chr(10);
    AssignFile(F, 'LPT1');
    Rewrite(F);
    Write(F, PDStr);
    CloseFile(F);
  except
    Messagedlg('数据发送失败!', mterror, [mbok], 0);
  end;
end;

解决方案 »

  1.   

    用USB转换出的打印端口的名称不是LPT1,一般是USB001、USB002之类的。
    你可以通过查看打印机的属性中,来获得这个端口的名称。
      

  2.   

    借楼主的地方问下路,,,就是在用硬字库打印时,用并口或者串口
    怎么判决打印机状态..如:打不开LTP1口,串口,打印机卡纸,缺纸,打印打没接电源...
    用D怎么返回这些状态呢?
      

  3.   

    借楼主的地方问下路,,,就是在用硬字库打印时,用并口或者串口 
    怎么判决打印机状态..如:打不开LTP1口,串口,打印机卡纸,缺纸,打印打没接电源... 
    用D怎么返回这些状态呢?POS协议有检测打印机忙 还是缺纸状态的指令(有便宜货连缺纸检测都没有)没接电源? 发上述指令没响应即是编码上就是从串(并)口写个字串,再读回来