printer.getprinter(mdevice, mdriver, mport, mhdmode);
printer.setprinter(pchar(g_PRNzt), mdriver, mport, mhdmode);// 设置打印机,pchar(g_PRNzt)--打印机名称
printer.Canvas.Font.name:=‘宋体‘;
printer.Canvas.Font.Size:=10;
assignprn(prntext);
Rewrite(prntext);
writeln(prntext, ‘ 总台打印机测试‘) ;
CloseFile(prntext);
时间: 2024-11-25 14:03:20