zoukankan      html  css  js  c++  java
  • Delphi获取默认打印机名称及端口

    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;
  • 相关阅读:
    py程序----两个判断回文的程序
    Python特性
    python-基本数据类型
    shell编程第一天
    iptables防火墙
    纤维参数测量
    线性代数及其应用(最小二乘、PCA、SVD)
    水流方向检测
    微信跳一跳-MATLAB实现
    相机标定opencv实现
  • 原文地址:https://www.cnblogs.com/keanuyaoo/p/3253518.html
Copyright © 2011-2022 走看看