{*******************************************************}
{                                                       }
{       海康威視(DS4XXXHC) SDK-2 集成開發包             }
{                   客戶端                              }
{       版權所有 (C) 2007 EMAIL：366733082@163.com      }
{                                                       }
{*******************************************************}

{
更新日期：2007年8月8日
}
unit HirkClient32;

interface
uses
  Windows, SysUtils, MMSystem, Classes;

type
  TCallBackFunc = procedure(Channels: Byte; War_Style: Byte; ReturnStr: string = ''); stdcall;
  TDeviceName = (Master, Microphone, WaveOut, Synth);

const
  HikRunSDK         = 'HikClient32.dll'; //SDK-2鏈接庫文件名，請保存與文件實名同步修改

  //回調函數接口
procedure Set_CallBack_Func(Func: TCallBackFunc); stdcall; stdcall; external HikRunSDK;
//配置端口號(進程句柄，服務端口，客戶端口)
function Set_Client_NetPort(AppHandle: THandle; ServerPort: Word; ClientPort: Word): Boolean; stdcall; external HikRunSDK;
//啟動客戶端并連接服務器(服務器IP地址，圖像顯示區域句柄，遠程通道號，是否解碼：默認解碼，顯示模式。NORMALMODE或者OVERLAYMODE,只有后者才可用來設置穿透色)
function Start_Client(ServerIP: PChar; VideoHandel: THandle; RemoteChannel: Byte = 1; IsDecode: Boolean = True; IsNormalmode: Boolean = True): Integer; stdcall; external HikRunSDK;
//停止客戶端連接
function Stop_Client(): Boolean; stdcall; external HikRunSDK;
//獲取工作狀態
function Get_Client_State: PChar; stdcall; external HikRunSDK;
//獲取服務端的通道數(服務器IP地址)
function Get_Server_ChanNum(): DWORD; stdcall; external HikRunSDK;
//抓取服務器監控圖像(保存文件名),抓圖得到的圖像數據保存成BMP文件
function Start_Image_Capture(Filename: string = ''): Boolean; stdcall; external HikRunSDK;
//啟動錄像（通道號，保存錄像文件名,自動停止錄像時間：優先權低，自動錄像大小：優先權高）
function Start_Video_Capture(Filename: string = ''; StopMinute: Word = 0; AutoSize: Word = 0): Boolean; stdcall; external HikRunSDK;
//停止錄像
function Stop_Video_Capture(): Boolean; stdcall; external HikRunSDK;
//系統校時
procedure Set_Winclock(Datetime: TDateTime); stdcall; external HikRunSDK;
//對服務端的nChannel 通道網絡連接初始化，結束當前所有用戶對它的訪問
function Shut_Client(): Boolean; stdcall; external HikRunSDK;
//開始屏幕輸出（通道號，輸出內容，輸出左上角座標位置，是否透明輸出，輸出字體顏色RGB，是否輸出時間）
function Start_Screen_Draw(I_Text: string; I_Left: Integer = 0; I_Top: Integer = 0; I_IsTransparence: Boolean = True; I_R: Byte = 255; I_G: Byte = 255; I_B: Byte = 255; I_IsDateTime: Boolean = False): Boolean; stdcall; external HikRunSDK;
//停止屏幕輸出(通道號)
function Stop_Screen_Draw(): Integer; stdcall; external HikRunSDK;
//啟動音頻預覽
function Start_Audio_Preview(): Boolean; stdcall; external HikRunSDK;
//停止音頻預覽
function Stop_Audio_Preview(): Boolean; stdcall; external HikRunSDK;
//獲取已經解碼的總幀數
function Get_Client_FrameNum(): Word; stdcall; external HikRunSDK;
//設置解碼時丟棄B幀的個數
function Set_Client_ThrowBFrame(LostFrames: DWORD): Boolean; stdcall; external HikRunSDK;
//獲取視頻參數（通道號,亮度，對比度，飽和度，色度）
function Get_Video_Para(var Brightness, Contrast, Saturation, Hue: Integer): Boolean; stdcall; external HikRunSDK;
//設置視頻參數（通道號,亮度，對比度，飽和度，色度）
function Set_Video_Para(Brightness, Contrast, Saturation, Hue: Byte): LongBool; stdcall; external HikRunSDK;
//快速黑白、彩色圖像切換（通道號，是否黑白）
function Set_Video_NoColor(IsNoColor: Boolean = True): LongBool; stdcall; external HikRunSDK;
//復位視頻圖像參數
function Reset_Video_Para: LongBool; stdcall; external HikRunSDK;
//黑屏
function Set_Video_Black: LongBool; stdcall; external HikRunSDK;
//白屏
function Set_Video_White: LongBool; stdcall; external HikRunSDK;
//改變屏幕分辨率
function Set_Screen_Para(X, Y: Word; Frequency: Byte = 60): Boolean; stdcall; external HikRunSDK;
//調用全屏窗口(是否自動巡回顯示各通道監控畫面,默認不自動切換，值＝０)
function Start_Video_FullScreen(AutoCircuit: Byte = 0): Integer; stdcall; external HikRunSDK;
//獲取Master音量
function Get_Volume_Master(): Word; stdcall; external HikRunSDK;
//設置Master音量
procedure Set_Volume_Master(Value: Word); stdcall; external HikRunSDK;
//獲取WaveOut音量
function Get_Volume_WaveOut(): Word; stdcall; external HikRunSDK;
//設置WaveOut音量
procedure Set_Volume_WaveOut(Value: Word); stdcall; external HikRunSDK;
//獲取Synth音量
function Get_Volume_Synth(): Word; stdcall; external HikRunSDK;
//設置Synth音量
procedure Set_Volume_Synth(Value: Word); stdcall; external HikRunSDK;
//靜音自動切換
procedure Set_Volume_Mute; stdcall; external HikRunSDK;
//獲取本SDK版本信息
function Get_SDK_Version(): PChar; stdcall; external HikRunSDK;
//獲取機器碼
function Get_UserID: PChar; stdcall; external HikRunSDK;
//獲取注冊狀態
function Get_SDK_Reg: Boolean; stdcall; external HikRunSDK;
//發送郵件（郵件服務器域名，用戶名，密碼，發送信箱，目的信息，主題，信件正文內容：字符串):布爾
function Send_Mail(TSmtp, TUser, TPass, TGetMail, TTOMail, TSubject, TMailText: string): Boolean; stdcall; external HikRunSDK;
//本地IP
function Get_LocalIP: PChar; stdcall; external HikRunSDK;

implementation

end.