panelxmx3gcontrol_tlb.pas

NXP 芯片 Delphi 开发包. 做RFID用的.

  TxMxPageKey = TOleEnum;
const
  mpkP0Kd = $00000001;
  mpkP0Kc = $00000002;
  mpkP1Kd = $00000003;
  mpkP1Kc = $00000004;
  mpkP2Kd = $00000005;
  mpkP2Kc = $00000006;
  mpkP3Kd = $00000007;
  mpkP3Kc = $00000008;
  mpkP4Kd = $00000009;
  mpkP4Kc = $0000000A;
  mpkP5Kd = $0000000B;
  mpkP5Kc = $0000000C;
  mpkP6Kd = $0000000D;
  mpkP6Kc = $0000000E;
  mpkP7Kd = $0000000F;
  mpkP7Kc = $00000010;
  mpkTransport = $00000011;
  mpkExchange = $00000000;
  mpkNoAuth = $00000019;

// Constants for enum TxMxSecurityChecking
type
  TxMxSecurityChecking = TOleEnum;
const
  mscCheckAlways = $00000000;
  mscDetect = $00000001;

// Constants for enum TxMxEASMethod
type
  TxMxEASMethod = TOleEnum;
const
  measmCheck = $00000000;
  measmPicoTag = $00000001;
  measmPicoPass = $00000002;

// Constants for enum TxMxTCLProtocolSpeed
type
  TxMxTCLProtocolSpeed = TOleEnum;
const
  tclps106kbps = $00000000;
  tclps212kbps = $00000001;
  tclps424kbps = $00000002;
  tclps847kbps = $00000003;

// Constants for enum TxMxTCLCardType
type
  TxMxTCLCardType = TOleEnum;
const
  tclctISO_14443_A_B_4 = $00000000;
  tclctISO_14443_A_4 = $00000001;
  tclctISO_14443_B_4 = $00000002;

// Constants for enum TxMxMicroPassType
type
  TxMxMicroPassType = TOleEnum;
const
  mmptUnknown = $00000000;
  mmptD8 = $00000001;
  mmptL4 = $00000002;

type

// *********************************************************************//
// Forward declaration of types defined in TypeLibrary                    
// *********************************************************************//
  IPanelXMX3G = interface;
  IPanelXMX3GDisp = dispinterface;
  IPanelXMX3GEvents = dispinterface;

// *********************************************************************//
// Declaration of CoClasses defined in Type Library                       
// (NOTE: Here we map each CoClass to its Default Interface)              
// *********************************************************************//
  PanelXMX3G = IPanelXMX3G;


// *********************************************************************//
// Interface: IPanelXMX3G
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {CF224775-88B3-4A24-B516-7FA1ADD77898}
// *********************************************************************//
  IPanelXMX3G = interface(IDispatch)
    ['{CF224775-88B3-4A24-B516-7FA1ADD77898}']
    procedure ShowModal; safecall;
    function Connect: WordBool; safecall;
    function ConnectTo(p_sCom: OleVariant): WordBool; safecall;
    function Disconnect: WordBool; safecall;
    function SelectCard(p_bSelectMode: Integer; p_bChipTypes: Integer; var p_sSN: OleVariant): WordBool; safecall;
    function ReSelect(p_sSN: OleVariant): WordBool; safecall;
    function ReadBlock(p_iBlock: Integer; p_iBlockCount: Integer; var p_sData: OleVariant): WordBool; safecall;
    function WriteBlock(p_iBlock: Integer; p_iBlockCount: Integer; p_sData: OleVariant): WordBool; safecall;
    function DecreaseCounter(p_iDebit: Integer; var p_iCounterNew: Integer): WordBool; safecall;
    function IncreaseCounter(p_iCounterNew: Integer; var p_iRechargingCounterNew: Integer): WordBool; safecall;
    function Transmit(p_iP1: Integer; p_iP2: Integer; p_iP3: Integer; p_sDataIn: OleVariant; 
                      var p_sDataOut: OleVariant): WordBool; safecall;
    function Halt: WordBool; safecall;
    function LoadKey(p_iKeyNum: TxMxKey): WordBool; safecall;
    function KeyLoading(p_iKeyNum: TxMxKey; p_iKeyLoadingMode: TxMxKeyLoadingMode; 
                        p_sKeyExchange: OleVariant; p_sKeyToLoad: OleVariant): WordBool; safecall;
    function KeyLoading3DESEDE(p_iP1: Integer; p_iP2: Integer; p_sExchangeKey: OleVariant; 
                               p_sKeyToLoad: OleVariant): WordBool; safecall;
    function DiversifyKey(p_iKeyNum: TxMxKey; p_sSN: OleVariant; var p_sKeyDiversified: OleVariant): WordBool; safecall;
    function Disable: WordBool; safecall;
    function Enable: WordBool; safecall;
    function SetStatus(p_iLocation: Integer; p_iAddress: Integer; p_iData: Integer): WordBool; safecall;
    function GetStatus(p_iLocation: Integer; p_iAddress: Integer; var p_iData: Integer): WordBool; safecall;
    function ResetField: WordBool; safecall;
    function AskRandom(var p_sRnd: OleVariant): WordBool; safecall;
    function SelectPage(p_iKey: TxMxKey; p_iPage: Integer; var p_sBlockConfig: OleVariant): WordBool; safecall;
    function Authentify(p_iKey: TxMxKey; var p_sSN: OleVariant): WordBool; safecall;
    function GetLastError: Integer; safecall;
    function GetMxLastStatus: Integer; safecall;
    function GetMXLastStatusDesc: WideString; safecall;
    function EASDetect(var p_sSN: OleVariant): WordBool; safecall;
    function EASActivate: WordBool; safecall;
    function EASDesactivate: WordBool; safecall;
    function IsChipSecured: WordBool; safecall;
    function CryptoEncryptSingleDES(p_sKey: OleVariant; p_sData: OleVariant): WideString; safecall;
    function CryptoDecryptSingleDES(p_sKey: OleVariant; p_sData: OleVariant): WideString; safecall;
    function CryptoEncryptTripleDESEDE(p_sKey1: OleVariant; p_sKey2: OleVariant; p_sData: OleVariant): WideString; safecall;
    function CryptoDecryptTripleDESEDE(p_sKey1: OleVariant; p_sKey2: OleVariant; p_sData: OleVariant): WideString; safecall;
    function SetEEPROMSpeed: WordBool; safecall;
    function LogSaveToFile(p_sFileName: OleVariant): WordBool; safecall;
    procedure LogClear; safecall;
    function Get_Visible: WordBool; safecall;
    procedure Set_Visible(Value: WordBool); safecall;
    function Get_MxVersion: WideString; safecall;
    function Get_MxComOpened: WordBool; safecall;
    function Get_MxComHandle: LongWord; safecall;
    function Get_MxComSpeed: TxMxSpeed; safecall;
    procedure Set_MxComSpeed(Value: TxMxSpeed); safecall;
    function Get_MxCaption: WideString; safecall;
    procedure Set_MxCaption(const Value: WideString); safecall;
    function Get_MxHexaSymbol: WideString; safecall;
    procedure Set_MxHexaSymbol(const Value: WideString); safecall;
    function Get_MxType: TxMxType; safecall;
    procedure Set_MxType(Value: TxMxType); safecall;
    function Get_MxModulation: TxMxModulation; safecall;
    procedure Set_MxModulation(Value: TxMxModulation); safecall;
    function Get_MxKe: WideString; safecall;
    procedure Set_MxKe(const Value: WideString); safecall;
    function Get_MxKeOld: WideString; safecall;
    procedure Set_MxKeOld(const Value: WideString); safecall;
    function Get_MxKc: WideString; safecall;
    procedure Set_MxKc(const Value: WideString); safecall;
    function Get_MxKd: WideString; safecall;
    procedure Set_MxKd(const Value: WideString); safecall;
    function Get_MxPassword: WideString; safecall;
    procedure Set_MxPassword(const Value: WideString); safecall;
    function Get_MxKdt: WideString; safecall;
    procedure Set_MxKdt(const Value: WideString); safecall;
    function Get_MxInstructionCoding: TxMxInstructionCoding; safecall;
    procedure Set_MxInstructionCoding(Value: TxMxInstructionCoding); safecall;
    function Get_MxInstructionKey: TxMxInstructionKey; safecall;
    procedure Set_MxInstructionKey(Value: TxMxInstructionKey); safecall;
    function Get_MxKeyLoadingMode: TxMxKeyLoadingMode; safecall;
    procedure Set_MxKeyLoadingMode(Value: TxMxKeyLoadingMode); safecall;
    function Get_MxProtocolIndex: TxMxProtocolIndex; safecall;
    procedure Set_MxProtocolIndex(Value: TxMxProtocolIndex); safecall;
    function Get_MxRead: TxMxRead; safecall;
    procedure Set_MxRead(Value: TxMxRead); safecall;
    function Get_MxUserProtocol: TxMxUserProtocol; safecall;
    procedure Set_MxUserProtocol(Value: TxMxUserProtocol); safecall;
    function Get_MxCurrentKey: TxMxPageKey; safecall;
    procedure Set_MxCurrentKey(Value: TxMxPageKey); safecall;
    function Get_MxLastStatus: Integer; safecall;
    function Get_MxLastStatusDesc: WideString; safecall;
    function Get_MxID: WideString; safecall;
    procedure Set_MxID(const Value: WideString); safecall;
    function Get_MxComName: WideString; safecall;
    function Get_MxTimeOut: LongWord; safecall;
    procedure Set_MxTimeOut(Value: LongWord); safecall;
    function Get_MxWriteVerify: WordBool; safecall;
    procedure Set_MxWriteVerify(Value: WordBool); safecall;
    function Get_MxSecurityChecking: TxMxSecurityChecking; safecall;
    procedure Set_MxSecurityChecking(Value: TxMxSecurityChecking); safecall;
    function Get_MxChipSecurity: TxMxChipSecurity; safecall;
    procedure Set_MxChipSecurity(Value: TxMxChipSecurity); safecall;
    function Get_MxEASMethod: TxMxEASMethod; safecall;
    procedure Set_MxEASMethod(Value: TxMxEASMethod); safecall;
    function Get_MxLog: WordBool; safecall;
    procedure Set_MxLog(Value: WordBool); safecall;
    function Get_ParentBackground: WordBool; safecall;
    procedure Set_ParentBackground(Value: WordBool); safecall;
    function Get_DoubleBuffered: WordBool; safecall;
    procedure Set_DoubleBuffered(Value: WordBool); safecall;
    function Get_AlignDisabled: WordBool; safecall;
    function Get_VisibleDockClientCount: Integer; safecall;
    function DrawTextBiDiModeFlagsReadingOnly: Integer; safecall;
    function Get_Enabled: WordBool; safecall;
    procedure Set_Enabled(Value: WordBool); safecall;
    procedure InitiateAction; safecall;
    function IsRightToLeft: WordBool; safecall;
    function UseRightToLeftReading: WordBool; safecall;
    function UseRightToLeftScrollBar: WordBool; safecall;
    procedure SetSubComponent(IsSubComponent: WordBool); safecall;
    procedure AboutBox; safecall;
    function StringSelectCard(p_iSelectMode: Integer; p_iChipTypes: Integer; var p_sSN: WideString): WordBool; safecall;
    function StringReadBlock(p_iBlockStart: Integer; p_iBlockCount: Integer; var p_sData: WideString): WordBool; safecall;
    function StringWriteBlock(p_iBlockStart: Integer; p_iBlockCount: Integer; 
                              const p_sData: WideString): WordBool; safecall;
    function StringConvertHexaToAscii(const p_sHexa: WideString): WideString; safecall;
    function StringConvertAsciiToHexa(const p_sAscii: WideString): WideString; safecall;
    function StringAuthentify(p_iKey: TxMxKey; var p_sSN: WideString): WordBool; safecall;
    function StringSelectPage(p_iKey: TxMxKey; p_iPage: Integer; var p_sBlockConfig: WideString): WordBool; safecall;
    function StringDiversifyKey(p_iKeyNum: TxMxKey; const p_sSN: WideString; 
                                var p_sDiversifiedKey: WideString): WordBool; safecall;
    function StringReselect(const p_sSN: WideString): WordBool; safecall;
    function StringSelectAuthPage(p_iKey: TxMxKey; p_iPage: Integer; var p_sBlockConfig: WideString): WordBool; safecall;
    function StringKeyLoading(p_iKeyNum: TxMxKey; p_iKeyLoadingMode: TxMxKeyLoadingMode; 
                              const p_sKeyExchange: WideString; const p_sKeyToLoad: WideString): WordBool; safecall;
    function SelectAuthPage(p_iKey: TxMxKey; p_iPage: Integer; var p_sBlockConfig: OleVariant): WordBool; safecall;
    function Get_MxKHost: WideString; safecall;
    procedure Set_MxKHost(const Value: WideString); safecall;
    function SendISOCommand(p_iISOType: TxMxISO7816T0Direction; p_iNbDataOut: Integer; 
                            p_iClass: Integer; p_iIns: Integer; p_iP1: Integer; p_iP2: Integer; 
                            p_iP3: Integer; p_sDataIn: OleVariant; var p_sDataOut: OleVariant): Integer; safecall;
    function StringSendISOCommand(p_iISOType: TxMxISO7816T0Direction; p_iNbDataOut: Integer; 
                                  p_iClass: Integer; p_iIns: Integer; p_iP1: Integer; 
                                  p_iP2: Integer; p_iP3: Integer; const p_sDataIn: WideString; 
                                  var p_sDataOut: WideString): Integer; safecall;
    function ConvertHexaToAscii(p_sHexa: OleVariant): OleVariant; safecall;
    function ConvertAsciiToHexa(p_sAscii: OleVariant): OleVariant; safecall;
    function MicroPassCardConnect(p_bResetRFField: WordBool; p_eCardType: TxMxTCLCardType; 
                                  p_bCID: Integer; p_iPCDMaximumInputFrameSize: Integer; 
                                  p_eProtocolSpeed: TxMxTCLProtocolSpeed; var p_sSN: OleVariant; 
                                  var p_sRATS_RATTRIB: OleVariant): WordBool; safecall;
    function MicroPassCardTransmit(p_iDataOutLength: Integer; p_bClass: Integer; p_bIns: Integer; 
                                   p_bP1: Integer; p_bP2: Integer; p_bP3: Integer; 
                                   p_sDataIn: OleVariant; var p_sDataOut: OleVariant): Integer; safecall;
    function MicroPassGetATR(var p_sATR: OleVariant; var p_sVersion: OleVariant; 
                             var p_sComponent: OleVariant; var p_sLife: OleVariant; 
                             var p_eMicroPassType: TxMxMicroPassType): Integer; safecall;
    function MicroPassCreateMF: Integer; safecall;
    function MicroPassCreateDF(p_iDFIDHigh: Integer; p_iDFIDLow: Integer; 
                               p_sCreationData: OleVariant): Integer; safecall;
    function MicroPassCreateEF(p_bEFIDHigh: Integer; p_bEFIDLow: Integer; 
                               p_sCreationData: OleVariant): Integer; safecall;
    function MicroPassSelectMF(out p_sFCI: OleVariant): Integer; safecall;
    function MicroPassSelectFile(p_iSelectionType: Integer; p_iReturnFCI: Integer; 
                                 p_sSelectionData: OleVariant; out p_sFCI: OleVariant): Integer; safecall;
    function MicroPassFileUpdateBinary(p_iSFIOrOffsetHigh: Integer; p_iOffsetLow: Integer; 
                                       p_iLength: Integer; p_sData: OleVariant): Integer; safecall;
    function MicroPassFileReadBinary(p_iSFIOrOffsetHigh: Integer; p_iOffsetLow: Integer; 
                                     p_iLength: Integer; out p_sData: OleVariant): Integer; safecall;
    function MicroPassAuthenticate3DESEDE(p_sKey: OleVariant; out p_sChallenge: OleVariant; 
                                          out p_sSignature: OleVariant): Integer; safecall;
    procedure Set_MxComHandle(Value: LongWord); safecall;
    property Visible: WordBool read Get_Visible write Set_Visible;
    property MxVersion: WideString read Get_MxVersion;
    property MxComOpened: WordBool read Get_MxComOpened;
    property MxComHandle: LongWord read Get_MxComHandle write Set_MxComHandle;
    property MxComSpeed: TxMxSpeed read Get_MxComSpeed write Set_MxComSpeed;
    property MxCaption: WideString read Get_MxCaption write Set_MxCaption;
    property MxHexaSymbol: WideString read Get_MxHexaSymbol write Set_MxHexaSymbol;
    property MxType: TxMxType read Get_MxType write Set_MxType;
    property MxModulation: TxMxModulation read Get_MxModulation write Set_MxModulation;
    property MxKe: WideString read Get_MxKe write Set_MxKe;
    property MxKeOld: WideString read Get_MxKeOld write Set_MxKeOld;
    property MxKc: WideString read Get_MxKc write Set_MxKc;
    property MxKd: WideString read Get_MxKd write Set_MxKd;
    property MxPassword: WideString read Get_MxPassword write Set_MxPassword;
    property MxKdt: WideString read Get_MxKdt write Set_MxKdt;
    property MxInstructionCoding: TxMxInstructionCoding read Get_MxInstructionCoding write Set_MxInstructionCoding;
    property MxInstructionKey: TxMxInstructionKey read Get_MxInstructionKey write Set_MxInstructionKey;