Question

现在用Delphi有什么方法可以对并口进行操作

Answer 1

使用Delphi编程的人员如果需要在Windows下使用并口打印机逐行打印，而又不想使用Windows的驱动程序。我们这里提供一种不需要任何外来的元件的方法。
Var F:TextFile;
Str:string;
Begin
try
Str:=’ 欢迎使用票据打印机!’+Chr(10);
AssignFile(F, 'LPT1');
Rewrite(F);
Write(F, Str);
CloseFile(F);
Except
Messagedlg('数据发送失败！',mterror,[mbok],0);
End;
end;
如果需要控制并口打印机开钱箱，也只需要重新给Str如下赋值：
Str:= Chr(27)+'p'+Chr(0)+Chr(25)+Chr(255);

Delphi下使用串口控制打印机
使用Delphi编程的人员如果需要在Windows下使用串口控制顾客显示屏或串口打印机，就需要使用外来方式。我们这里提供了API_COM.DLL这个链接库供调用。
首先把API_COM.DLL文件复制到编写的源程序目录下，接着在程序的开头声明调用的三个函数来源：
var
Form1: TForm1;