摘要：
// 向LPT口打印一个文本文件 procedure TPosFrm.PrintFile(AFileToPrint: string); var Port, FileToPrint: TextFile; ALine: string; begin AssignFile(FileToPrint, AFileToPrint); Reset(FileToprint); AssignF... 阅读全文
posted @ 2010-10-22 20:38 草庵书生 阅读(538) 评论(1) 推荐(0) 编辑