hikclient32.pas

ＤＥＬＰＨＩ开发包

  参　数：    RemoteChannel: Byte = 0
  返回值：    Boolean
  备　注：
-------------------------------------------------------------------------------}
function Stop_Audio_Preview
  (
  RemoteChannel: Byte = 0               //远程通道索引号
  ): Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_Client_FrameNum
  功　能：　　获取已经解码的总帧数
  开　发：    SelonSoft
  日　期：    2007.08.12
  参　数：    RemoteChannel: Byte = 0
  返回值：    Word
  备　注：
-------------------------------------------------------------------------------}
function Get_Client_FrameNum
  (
  RemoteChannel: Byte = 0               //远程通道索引号
  ): Word; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Client_ThrowBFrame
  功　能：　　设置解码时丢弃B帧的个数
  开　发：    SelonSoft
  日　期：    2007.08.12
  参　数：    RemoteChannel: Byte = 0; LostFrames: DWORD = 0
  返回值：    Boolean
  备　注：
-------------------------------------------------------------------------------}
function Set_Client_ThrowBFrame
  (
  RemoteChannel: Byte = 0;              //远程通道索引号
  LostFrames: DWORD = 0                 //丢弃B帧的个数
  ): Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_Video_Para
  功　能：　　获取视频参数
  开　发：    SelonSoft
  日　期：    2007.08.12
  参　数：    Channels_Index: Byte; var P_Ld, P_Dbd, P_Bhd, P_Sd: Byte
  返回值：    Integer
  备　注：
-------------------------------------------------------------------------------}
function Get_Video_Para
  (
  Channels_Index: Byte;                 //通道索引号
  var P_Ld, P_Dbd, P_Bhd, P_Sd: Byte    //返回通道号,亮度，对比度，饱和度，色度
  ): Integer; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Video_Para
  功　能：　　设置视频参数
  开　发：    SelonSoft
  日　期：    2007.08.12
  参　数：    Channels_Index: Byte; P_Ld, P_Dbd, P_Bhd, P_Sd: Byte
  返回值：    Integer
  备　注：    亮度值（0—255）对比度（0—127）饱和度（0—127）色调（0—255）
-------------------------------------------------------------------------------}
function Set_Video_Para
  (
  Channels_Index: Byte;                 //通道索引号
  P_Ld, P_Dbd, P_Bhd, P_Sd: Byte        //指定的亮度，对比度，饱和度，色度值
  ): Integer; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Video_NoColor
  功　能：　　
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    RemoteChannel: Byte; IsNoColor: Boolean = True
  返回值：    LongBool
  备　注：
-------------------------------------------------------------------------------}
function Set_Video_NoColor
  (
  RemoteChannel: Byte;
  IsNoColor: Boolean = True
  ): LongBool; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Reset_Video_Para
  功　能：　　复位视频图像的标准参数
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    Channels_Index: Byte
  返回值：    Integer
  备　注：    快速切换成默认的标准视频值
-------------------------------------------------------------------------------}
function Reset_Video_Para
  (
  Channels_Index: Byte                  //通道索引号
  ): Integer; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Screen_Black
  功　能：　　让指定的通道视频变成全黑
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    Channels_Index: Byte
  返回值：    Integer
  备　注：    不同于无视频信号，调用后录像视频也变成黑色
-------------------------------------------------------------------------------}
function Set_Screen_Black
  (
  Channels_Index: Byte                  //通道索引号
  ): Integer; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Screen_White
  功　能：　　让指定的通道视频变成全白
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    Channels_Index: Byte
  返回值：    Integer
  备　注：    调用后录像视频也变成白色
-------------------------------------------------------------------------------}
function Set_Screen_White
  (
  Channels_Index: Byte                  //通道索引号
  ): Integer; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
  过程名：　  Set_Screen_Para
  功　能：　　调整屏幕分辨率
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    X, Y: Word; Frequency: Byte = 60
  返回值：    Boolean
  备　注：    针对个别品牌的ＬＣＤ不能显示60ＨＺ以上的刷新率设计
-------------------------------------------------------------------------------}
function Set_Screen_Para
  (
  X, Y: Word;                           //分辨率宽高比例值
  Frequency: Byte = 60                  //屏幕刷新率，默认60ＨＺ
  ): Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Start_Video_FullScreen
  功　能：　　全屏显示视频图像
  开　发：    SelonSoft
  日　期：    2007.08.20
  参　数：    Channels_Index: Byte; AutoCircuit: Byte = 0
  返回值：    Integer
  备　注：
-------------------------------------------------------------------------------}
function Start_Video_FullScreen
  (
  Channels_Index: Byte;                 //通道索引号
  AutoCircuit: Byte = 0                 //全屏状态下是否自动巡回显示各通道监控画面,默认不自动切换
  ): Integer; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_Volume_Master
  功　能：　　获取Master音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：
  返回值：    Word
  备　注：
-------------------------------------------------------------------------------}
function Get_Volume_Master(): Word; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Volume_Master
  功　能：　　设置Master音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    Value: Word
  返回值：    无
  备　注：
-------------------------------------------------------------------------------}
procedure Set_Volume_Master
  (
  Value: Word
  ); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
  过程名：　  Get_Volume_WaveOut
  功　能：　　获取WaveOut音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：
  返回值：    Word
  备　注：
-------------------------------------------------------------------------------}
function Get_Volume_WaveOut(): Word; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Volume_WaveOut
  功　能：　　设置WaveOut音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    Value: Word
  返回值：    无
  备　注：
-------------------------------------------------------------------------------}
procedure Set_Volume_WaveOut
  (
  Value: Word
  ); stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_Volume_Synth
  功　能：　　获取Synth音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：
  返回值：    Word
  备　注：
-------------------------------------------------------------------------------}
function Get_Volume_Synth(): Word; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Volume_Synth
  功　能：　　设置Synth音量
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    Value: Word
  返回值：    无
  备　注：
-------------------------------------------------------------------------------}
procedure Set_Volume_Synth
  (
  Value: Word
  ); stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Set_Volume_Mute
  功　能：　　静音切换
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    无
  返回值：    无
  备　注：    在静音或非静音间切换
-------------------------------------------------------------------------------}
procedure Set_Volume_Mute; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Check_Video_Size
  功　能：　　监视视频录像文件大小
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    RemoteChannel: Byte = 0
  返回值：    Byte
  备　注：
-------------------------------------------------------------------------------}
function Check_Video_Size
  (
  RemoteChannel: Byte = 0
  ): Byte; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_SDK_Version
  功　能：　　获取SDK2版本信息
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：
  返回值：    PChar
  备　注：
-------------------------------------------------------------------------------}
function Get_SDK_Version(): PChar; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_UserID
  功　能：　　获取机器码
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    无
  返回值：    Pchar
  备　注：
-------------------------------------------------------------------------------}
function Get_UserID: PChar; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_SDK_Reg
  功　能：　　获取注册状态
  开　发：    SelonSoft
  日　期：    2007.9.06
  参　数：    无
  返回值：    Boolean
  备　注：    可返回ＳＤＫ２的注册状态，用于软件外部判断
-------------------------------------------------------------------------------}
function Get_SDK_Reg: Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Send_Mail
  功　能：　　发送电子邮件
  开　发：    SelonSoft
  日　期：    2007.10.11
  参　数：    TSmtp, TUser, TPass, TGetMail, TTOMail, TSubject, TMailText: string
  返回值：    Boolean
  备　注：
-------------------------------------------------------------------------------}
function Send_Mail
  (
  //邮件服务器域名，用户名，密码，发送信箱，目的信息，主题，信件正文内容
  TSmtp, TUser, TPass, TGetMail, TTOMail, TSubject, TMailText: string
  ): Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_LocalIP
  功　能：　　获取本地ＩＰ
  开　发：    SelonSoft
  日　期：    2007.10.11
  参　数：    无
  返回值：    PChar
  备　注：
-------------------------------------------------------------------------------}
function Get_LocalIP: PChar; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Get_Pro_List
  功　能：　　获取云台解码器控制协议列表
  开　发：    SelonSoft
  日　期：    2007.10.11
  参　数：    var List: TStringList
  返回值：    Boolean
  备　注：    目前ＳＤＫ２内部集成140种解码器协议，涵盖众多主流解码器厂家产品
-------------------------------------------------------------------------------}
function Get_Pro_List
  (
  var List: TStringList                 //返回ＳＤＫ２支持的云台解码控制协议列表
  ): Boolean; stdcall; external HikRunSDK;

{-------------------------------------------------------------------------------
  过程名：　  Remot_Contrl
  功　能：　　控制云台动作指令
  开　发：    SelonSoft
  日　期：    2007.10.11