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

在前段时间写的收银系统中由于目前市场上很多电脑主板上已经没有并口，而POS机却又需要并口，所以目前需要用PCI转接卡，这个就导致不同门店使用的端口就有可能不同，这就给我们程序中弹出钱箱的指令带来一定的难度。所以就通过获取Window自带的默认，得出打印机信息。

在Windows文件下有个win.ini，里面自带默认打印机的信息。通过调用API函数Getprofilestring这个函数获取打印机信息。

在界面上拖个button，在其单击事件中写：

procedure TForm1.Btn1Click(Sender: TObject);
var
    AppName : Array [0..256] of Char;    //节名称字符串
    KeyName : Array [0..256] of Char; //键名称字符串
    DefaultString : Array [0..256] of Char; //在键名没找到时默认返回的字串
    ReturnedString : Array [0..256] of Char; //在键名找到时返回的字串
begin
    AppName := 'Windows';//节名称
    KeyName := 'device';    //键名称
    GetProfileString(AppName,KeyName,DefaultString,ReturnedString,Sizeof(ReturnedString));
    ShowMessage(ReturnedString);
end;

转载于:https://www.cnblogs.com/chenbg2001/archive/2009/08/29/1556446.html

Delphi获取默认打印机名称及端口相关推荐

获取所有打印机，设置默认打印机，获取默认打印机
#include <winspool.h> #pragma comment(lib, "Winspool.lib") /获取默认打印机/ static void Get ...
Delphi获得计算机系统配置,用Delphi获取本地计算机名称和IP地址
下载本文示例代码本程序介绍如何获取本地计算机的名称和IP地址. 向窗体上添加两个TLabel组件.两个TEdit组件和一个TButton组件,设计完成的主界面如图1所示. 图1 主界面首先在程序的 ...
vb.net 获取打印机工作状态，是否离线，打印机名称，端口号等打印机属性信息，windows 7下亲测可用
这是vb.net 版本的,我测试了,没有问题,列出当前计算机系统中所有的打印机,列出其所有属性,网上好多人写的获取打印机状态的字段是不正确的,判断是否脱机或离线,应该选字段WorkOffline才对. ...
delphi获取本地外网ip_端口转发什么原理？WAN,LAN区别？私有IP和公有IP区别？
本文原创作者:原理君(cpp软件架构狮) 头条号:底层软件架构(cpp软件架构狮) 公众号:技术原理君对于我们网络开发的人员来说,经常会用到TCP,UDP协议,但是通常情况下,是在局域网内的协议交互 ...
获取和设置默认打印机
获取打印机列表:public class LocalPrinter { private static PrintDocument fPrintDocument = new PrintDocument( ...
JAVA获取打印机和默认打印机
JAVA获取打印机 JAVA获取本机的所有打印机获取默认打印机 JAVA获取本机的所有打印机 // 获取本机打印机 PrintService[] pss = PrinterJob.lookupPri ...
获取局域网打印机列表
/// <summary> /// 获取局域网打印机列表 /// </summary> /// <param name=& ...
通过注册表设置默认打印机的方法
//获取默认打印机 BOOL CPrinterInfo::GetTheDefaultPrinterByReg() { //通过注册表,获取默认的打印机配置 HKEY defaultKey; DW ...
外部网络如何获取网口打印机的ip地址_网络打印机端口用名称好是还是IP好？...
在设置网络打印机过程中,最重要的一个步骤就是端口的设置,根据具体的网络环境来进行配置端口是保证网络打印机正常运行的保障. 一.打印机端口 1.1usb端口一般有USB打印数据线直接与电脑相连的端口, ...

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

Delphi获取默认打印机名称及端口相关推荐

最新文章

热门文章