Delphi获取默认打印机名称及端口

最新推荐文章于 2022-02-23 13:21:14 发布
最新推荐文章于 2022-02-23 13:21:14 发布
阅读量5k 收藏 2
点赞数
分类专栏： Delphi 打印机 文章标签： Delphi 打印机
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/lailai186/article/details/9924035
版权
本文介绍如何在Delphi程序中获取默认打印机的名称和端口。由于不同门店可能使用不同端口连接POS机，因此需要通过Windows API函数GetProfileString读取win.ini文件中的默认打印机设置，以便于正确发送钱箱弹出指令。
摘要由CSDN通过智能技术生成
Delphi获取默认打印机名称及端口 

在前段时间写的收银系统中由于目前市场上很多电脑主板上已经没有并口，而POS机却又需要并口，所以目前需要用PCI转接卡，这个就导致不同门店使用的端口就有可能不同，这就给我们程序中弹出钱箱的指令带来一定的难度。所以就通过获取Window自带的默认，得出打印机信息。
在Windows文件下有个win.ini，里面自带默认打印机的信息。通过调用API函数Getprofilestring这个函数获取打印机信息。
 
在界面上拖个button，在其单击事件中写：
最低0.47元/天 解锁文章
落幕年代
关注
专栏目录
打印机相关
Johnny的专栏
07-22 951
数据的传输与命令的传输可以采用Socket，这个很容易吧（找个黑客软件源码）对打印机的操作。Delphi中获取打印机设备名和端口名uses Printers;{$IFNDEF WIN32}const MAX_PATH = 144;{$ENDIF}procedure TForm1.Button1Click(Sender: TObject);var  pDevice : pChar;  pDriver
delphi 获取打印机默认纸张_delphi 获取打印机纸型的例子
weixin_42360733的博客
01-26 277
function SetPaperSize(var nWidth,nHeight,nOrient:Word;var nHandle: THandle):integer; export;varszPrinterKey: array[0..99] of Char;szDeviceName: String;szPort: String;cbBuffer: DWORD;dwRV: DWORD;dwPape...
Delphi 获取系统默认打印机
YZW20140807的专栏
11-27 2576
function getSystemDefaultPrinter: string; var index: integer; defaultPrinter: string; flag: Boolean; len: DWORD; begin if (Printer = nil) or (printer.Printers.Count = 0) then begin Mes
Delphi获取打印机列表信息
11-28
Delphi获取打印机列表和详细信息
Delphi 设置系统默认打印机
weixin_34004576的博客
12-30 1133
获取默认打印机名：functionTForm1.GetDefaultPrinterName:string; var iSize:Integer; sIniFile,sSection,sKeyName:PChar; begin iSize:=256; sIniFile:='win.ini'; sSection:='windows'; ...
delphi 获取打印机默认纸张_Delphi获取默认打印机名称及端口
weixin_33514221的博客
02-15 288
Delphi获取默认打印机名称及端口 在前段时间写的收银系统中由于目前市场上很多电脑主板上已经没有并口，而POS机却又需要并口，所以目前需要用PCI转接卡，这个就导致不同门店使用的端口就有可能不同，这就给我们程序中弹出钱箱的指令带来一定的难度。所以就通Delphi获取默认打印机名称及端口在前段时间写的收银系统中由于目前市场上很多电脑主板上已经没有并口，而POS机却又需要并口，所以目前需要用PCI转...
delphi 获取打印机默认纸张_请教用DELPHI怎样设置和获得打印机的纸张大小
weixin_39637457的博客
12-30 472
由 wutianbin » 星期一, 2000年12月11日 15:20usesWindows,WinSpool, //一定要 uses 这玩意SysUtils,Registry,Classes;//=================================function TForm1.GetDeviceName():String;var MyReg: TRegistry;szDevi...
Delphi控制针式打印的纸张大小的函数.rar_Printers dephi_控制打印机_端口_纸张
09-23
在Delphi中，如果要在一台PC电脑上同时...如果要只定把数据打印在那一台打印机，不需要控制打印机端口，只需要使用打印机索引即可，默认打印机为第一台打印机，以后按顺序排序，但第一台打印机的索引号为 –1并不是0.
Delphi中获取打印机设备名和端口名
zgqtxwd的专栏
04-30 413
<!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--><script type="text/javascript"
获取打印机状态Delphi
05-15
用程序获取打印机状态 网络上的一些代码都不能成功 借鉴一下，查看API函数，一般是函数的参数使用不当造成 终于成功！ 含源代码： Ｄｅｌｐｈｉ６
delphi选择打印机:Delphi中获取打印机设备
weixin_34050519的博客
11-14 1229
delphi选择打印机:Delphi中获取打印机设备名和端口名 疯狂代码 http://www.CrazyCoder.cn/ :http:/www.CrazyCoder.cn/Delphi/Article11928.html uses Printers; {$IFNDEF WIN32} const MAX_PATH = 144; {$END...
Delphi中设置默认打印机
weixin_34273481的博客
09-18 218
type   TForm1 = class(TForm)     Button1: TButton;     ComboBox1: TComboBox;     procedure Button1Click(Sender: TObject);     procedure FormCreate(Sender: TObject);   private     { Private declarati...
Delphi 获取打印机，打印队列中任务数量
Ti-蜗牛的博客
02-23 745
项目中使用标签打印机打印标签，由于客户是“自由爱好者”，处理两次“无法打印”的技术咨询后，写了个函数： 虽然CSDN语法中都没有了Delphi，但是WEBURL调用打印机快速打印不干胶标签，Delphi是我效率最高的选项。 //打印机队列任务数 失败返回 -1，否则为队列任务数量 function GetPrinterTaskCount(PrinterName:String):Integer; implementation uses winspool; function GetPrinterTaskC
delphi 获取打印机默认纸张_Delphi怎么取指定打印机，指定纸张的宽宽度和高度等信息...
weixin_28871731的博客
12-30 423
Delphi如何取指定打印机，指定纸张的宽宽度和高度等信息？注意是指定了打印机和纸张。谢谢！------解决方案--------------------枚举所有打印机，按名字查询useswinspool,printers;...procedureTForm1.Button1Click(Sender:TObject);varHPrinter:THandle;Forms:arrayofT...
delphi 取得本机打印机列表及打印机详细信息
weixin_34023863的博客
09-06 398
delphi 取得本机打印机列表及打印机详细信息 2009-08-03 11:44 unit Unit1; interface uses ...
Delphi 中获取打印机状态与特性
首先，分配内存来存储`PRINTER_INFO_2`结构体，然后调用`OpenPrinter`打开打印机，接着用`GetPrinter`获取打印机信息，`PRINTER_INFO_2`结构体中的`Status`字段包含了打印机的状态信息。示例如下： ```delphi var ...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值