Ë­°ï潫delphi³ÌÐò¶Î·­Òë³ÉC#

unit DllExport;

interface

uses
  windows, SysUtils;


type
  TKzString = packed record
  returnlength: byte; //?????
  returnstring: array[0..255] of char;
  end;

  TReturnParam = packed record
  lx: byte; //ÃüÁîÀàÐÍ
  mon: integer; //¼àÊÓÆ÷ºÅ
  cam: integer; //ÉãÏñÍ·ºÅ
  controlindex: integer; //¾µÍ·¿ØÖÆÀàÐÍ
  Runtime: integer; //¾µÍ·¿ØÖÆʱ¼ä£¬0ΪֱÖÁÊÕµ½ÏÂÒ»¸ö¿ØÖÆÃüÁÆäËüΪ¶¯¶à³¤Ê±¼ä
  param1, param2, param3, Param4: integer; //¾µÍ·¿ØÖƵIJÎÊý
  end;
  //lx=1 Ñ¡È¡mon,
  //lx=2 Ñ¡È¡Cam
  //lx=3 ½«CamÇÐÖÁMON
  //lx=4 ¾µÍ·¿Øµô


//¾ØÕó¿âÃüÁî
function GetVideoMatrix(site, mon, cam, keyid: integer; var kzString: TkzString): boolean; stdcall; //
  //µÃµ½¾ØÕóÇл»ÃüÁî
  //ÊäÈë mon,cam ¼àÊÓÆ÷ºÅºÍ¾µÍ·ºÅ
  //keyID¼üÅÌIDºÅ
  //Êä³ö kzstring,²»³¬¹ý255

function GetAudioMatrix(site, mon, cam, keyid: integer; var kzString: TkzString): boolean; stdcall;
function NeedGetMonitor(): boolean; stdcall;
function GetMonitor(site, mon,cam, keyid: integer; var kzString: TkzString): boolean; stdcall;
function GetControlCode(site,mon, cam, controlindex, param1, param2, param3, Param4, keyid: integer; var sendnostop: Boolean; var ConTime: Integer; var kzString