?? hikserver32.pas
字號:
備 注: 可返回SDK2的注冊狀態,用于軟件外部判斷
-------------------------------------------------------------------------------}
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
功 能: 獲取本地IP
開 發: SelonSoft
日 期: 2007.10.11
參 數: 無
返回值: PChar
備 注:
-------------------------------------------------------------------------------}
function Get_LocalIP: PChar; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Get_Protocol_List
功 能: 獲取云臺解碼器控制協議列表
開 發: SelonSoft
日 期: 2007.10.11
參 數: var List: TStringList
返回值: Boolean
備 注: 目前SDK2內部集成140種解碼器協議,涵蓋眾多主流解碼器廠家產品
-------------------------------------------------------------------------------}
function Get_Protocol_List
(
var List: TStringList //返回SDK2支持的云臺解碼控制協議列表
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Protocol_RemotContrl
功 能: 控制云臺動作指令
開 發: SelonSoft
日 期: 2007.10.11
參 數: T_Com, T_Driv, T_Adr, T_Act: Byte; Is_Stop: Boolean = False
返回值: Boolean
備 注: 無須直接操作串口,相同指令不同參數即可完成云臺的全部標準動作
附動作值如下:
上-0 下-1 左-2 右-3 光圈開-4 光圈關-5 遠距離聚焦-6 近距離聚焦-7
鏡頭拉近-8 鏡頭拉遠-9 雨刷開關-11 燈光開關-12 電源開關-15
-------------------------------------------------------------------------------}
function Protocol_RemotContrl
(
//串口號,協議編號,云臺地址,動作編號
T_Com, T_Driv, T_Adr, T_Act: Byte;
Is_Stop: Boolean = False //默認不停止
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Send_Server_Command
功 能: 給正連接在該通道上的所有客戶端發送命令碼
開 發: SelonSoft
日 期: 2007.10.11
參 數: Channels_Index, Command: Byte
返回值: Boolean
備 注:
-------------------------------------------------------------------------------}
function Send_Server_Command
(
//通道索引號,命令碼
Channels_Index, Command: Byte
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Send_String_Client
功 能: 給客戶端發送消息字符串
開 發: SelonSoft
日 期: 2007.10.11
參 數: ClientIP, SendStr: PChar
返回值: Boolean
備 注:
-------------------------------------------------------------------------------}
function Send_String_Client
(
//客戶端IP,發送內容
ClientIP, SendStr: PChar
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Autorun_Reg
功 能: 設置隨WINDOWS自動運行
開 發: SelonSoft
日 期: 2007.10.11
參 數: IsAutoRun: Boolean; RegText, Appname: PChar
返回值: 無
備 注:
-------------------------------------------------------------------------------}
procedure Autorun_Reg
(
IsAutoRun: Boolean; //是否自動運行,為真表示自動運行
RegText, Appname: PChar //自動運行注冊鍵值,自動運行的程序完整路徑
); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Autorun_Reg_Exists
功 能: 判斷指定的程序是否已經設置為自動運行
開 發: SelonSoft
日 期: 2007.10.11
參 數: RegText, Appname: PChar
返回值: Boolean
備 注: 根據自動運行注冊鍵值,自動運行的程序完整路徑兩個參數來判斷
-------------------------------------------------------------------------------}
function Autorun_Reg_Exists
(
RegText, Appname: PChar //自動運行注冊鍵值,自動運行的程序完整路徑
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: AutoLogin_NT
功 能: 設置NT自動登錄
開 發: SelonSoft
日 期: 2007.10.11
參 數: DefaultDomainName, DefaultUserName, DefaultPassword, AutoLogon: PChar
返回值: 無
備 注: WINDOWS NT以上系統有效
-------------------------------------------------------------------------------}
procedure AutoLogin_NT
(
DefaultDomainName, DefaultUserName, DefaultPassword, AutoLogon: PChar
); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Share_Resource
功 能: 設置共享資源
開 發: SelonSoft
日 期: 2007.10.11
參 數: ServerName: PChar; FilePath: PChar; NetName: PChar; Remark: PChar; ShareType: Byte; Flags: Word; RWPass: PChar; ROPass: PChar
返回值: Integer
備 注:
-------------------------------------------------------------------------------}
function Share_Resource_Ena
(
ServerName: PChar; FilePath: PChar;
NetName: PChar; Remark: PChar;
ShareType: Byte; Flags: Word;
RWPass: PChar; ROPass: PChar
): Integer; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Delete_Share
功 能: 禁止共享資源
開 發: SelonSoft
日 期: 2007.10.11
參 數: ServerName: PChar; NetName: PChar
返回值: Integer
備 注:
-------------------------------------------------------------------------------}
function Share_Resource_Dis
(
ServerName: PChar;
NetName: PChar
): Integer; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Run_Service
功 能:
開 發: SelonSoft
日 期: 2007.11.02
參 數: Service_name: PChar; Is_Eabled: Boolean
返回值: 無
備 注:
-------------------------------------------------------------------------------}
procedure Run_Service
(
Service_name: PChar;
Is_Eabled: Boolean
); stdcall; external HikRunSDK; //禁用或啟動一個服務程序
{-------------------------------------------------------------------------------
過程名: net_share
功 能:
開 發: SelonSoft
日 期: 2007.11.02
參 數: Is_share: Boolean
返回值: 無
備 注:
-------------------------------------------------------------------------------}
procedure Net_share
(
Is_share: Boolean
); stdcall; external HikRunSDK; //打開或關閉網絡共享
{-------------------------------------------------------------------------------
過程名: SvrNameTo_IP
功 能:
開 發: SelonSoft
日 期: 2007.11.02
參 數: const SvrName: PChar
返回值: PChar
備 注:
-------------------------------------------------------------------------------}
function SvrNameTo_IP
(
const SvrName: PChar
): PChar; stdcall; external HikRunSDK; //域名轉IP地址
{-------------------------------------------------------------------------------
過程名: Net_Connection
功 能: 建立遠程連接
開 發: SelonSoft
日 期: 2007.11.02
參 數: xPath, xNetUser, xNetPassword: PChar
返回值: PChar
備 注:
-------------------------------------------------------------------------------}
function Net_Connection
(
//xPath: 遠程路徑 xNetUser/xNetPassword: 可以指定用戶名及密碼
xPath, xNetUser, xNetPassword: PChar
): PChar; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Net_DisConnection
功 能: 注銷遠程連接
開 發: SelonSoft
日 期: 2007.11.02
參 數: xPath: PChar
返回值: PChar
備 注: mPath如果傳入遠程路徑,則斷開與遠程路徑的網絡連接
如果傳入本地驅動器名,則斷開本地驅動器
-------------------------------------------------------------------------------}
function Net_DisConnection
(
xPath: PChar //遠程路徑
): PChar; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Login_RemoteComputer
功 能: 登錄遠端計算機
開 發: SelonSoft
日 期: 2007.11.02
參 數: AComputerName, AUserName, APassword: PChar
返回值: 無
備 注:
-------------------------------------------------------------------------------}
procedure Login_RemoteComputer
(
//計算機名稱,用戶名,密碼
AComputerName, AUserName, APassword: PChar
); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: LogOut_RemoteComputer
功 能: 注銷登錄遠端計算機
開 發: SelonSoft
日 期: 2007.11.02
參 數: AComputerName: PChar
返回值: 無
備 注:
-------------------------------------------------------------------------------}
procedure LogOut_RemoteComputer
(
AComputerName: PChar //計算機名稱
); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Download_File
功 能: 下載文件
開 發: SelonSoft
日 期: 2007.11.02
參 數: Source, Dest: PChar
返回值: Boolean
備 注:
-------------------------------------------------------------------------------}
function Download_File
(
//源地址,目標地址
Source, Dest: PChar
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
過程名: Check_Channel_State
功 能: 獲取通道工作狀態
開 發: SelonSoft
日 期: 2007.11.02
參 數: Channel_Index: Byte
返回值: TChannelState
備 注:
-------------------------
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -