zoukankan      html  css  js  c++  java
  • USB打印机开钱箱

    type
      TOutBufPassThrough = record   // 用于USB接口打印机开钱箱
      // 调用windows.extEscape可以直接用extEscape(handle, PASSTHROUGH, sizeOf(outBuf), @outBuf, 0, nil)向设备发送esc命令
        nDataLen: word;
        sEscData: array [0 .. 1024] of AnsiChar;
      end;

    procedure TFrmCollectionOrder.OpenUSBMoneyBox;
    var
      prt: TPrinter;
      esc: TOutBufPassThrough;
      sMoneyBoxOpenCommand: AnsiString;
    begin
      try
        prt := Printers.Printer;
        prt.beginDoc;
        sMoneyBoxOpenCommand := AnsiString(const_OpenMoneyBoxCommand);
        esc.nDataLen := Length(sMoneyBoxOpenCommand);
        strpCopy(esc.sEscData, sMoneyBoxOpenCommand);
        Windows.ExtEscape(prt.Handle, PASSTHROUGH, sizeOf(esc), @esc, 0, nil);
        // PASSTHROUGH:允许程序直接发送数据到设备
        prt.endDoc;
      except

      end;
    end;

  • 相关阅读:
    包 (package)
    Object类
    异常
    接口
    抽象类
    多态(经典案例)
    三大特性:(经典代码)
    对象创建的过程(重点理解)
    final关键字
    cocos2dx工程中接入支付宝sdk
  • 原文地址:https://www.cnblogs.com/hnxxcxg/p/2846443.html
Copyright © 2011-2022 走看看