📄 hikclient32.pas
字号:
备 注:
-------------------------------------------------------------------------------}
function Base64Decode(const s: string): string; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Get_HardwareFlag
功 能: 获取电脑硬件信息
开 发: SelonSoft
日 期: 2007.12.18
参 数: 无
返回值: THardware
备 注: 可返回主板、硬盘、处理器及网卡信息(同时兼容大部分笔计本硬件)
-------------------------------------------------------------------------------}
function Get_HardwareFlag: THardFlag; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Get_WindowsFlag
功 能: 获取操作系统信息
开 发: SelonSoft
日 期: 2007.12.18
参 数: 无
返回值: TWindowsFlag
备 注: 可返回系统文件夹登录帐户等相关的信息
-------------------------------------------------------------------------------}
function Get_WindowsFlag: TWindowsFlag; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_RegisterFile
功 能: 自定义注册文件名称
作 者: SelonSoft
日 期: 2007.12.21
参 数: Filename:string='HikVisionSDK.Key'
返回值: 无
备 注: 默认HikVisionSDK.Key
-------------------------------------------------------------------------------}
procedure Set_RegisterFile(Filename: string = 'HikVisionSDK.Key'); stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: CtrlAltDel_Eanbled
功 能: 使用系统按键Ctrl+Alt+Del(
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注: 注意关闭杀毒软件使用,否则有可能无效
-------------------------------------------------------------------------------}
function Set_CtrlAltDel_Eanbled: Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: CtrlAltDel_Disanbled
功 能: 禁用系统按键Ctrl+Alt+Del
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注: 注意关闭杀毒软件使用,否则有可能无效
-------------------------------------------------------------------------------}
function Set_CtrlAltDel_Disanbled: Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_TaskBar_Disanbled
功 能: 隐藏任务栏
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_TaskBar_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_TaskBar_Eanbled
功 能: 显示任务栏
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_TaskBar_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_DeskTop_Disanbled
功 能: 隐藏桌面
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_DeskTop_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_DeskTop_Eanbled
功 能: 显示桌面
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_DeskTop_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_Clock_Disanbled
功 能: 隐藏托盘时钟
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_Clock_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_Clock_Eanbled
功 能: 显示托盘时钟
作 者: SelonSoft
日 期: 2007.12.22
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_Clock_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_TaskTray_Disanbled
功 能: 禁止系统托盘
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_TaskTray_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_TaskTray_Eanbled
功 能: 使用系统托盘
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_TaskTray_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_AltTab_Disanbled
功 能: 禁止Alt+Tab
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_AltTab_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_AltTab_Eanbled
功 能: 使用Alt+Tab
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_AltTab_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_CtrlEsc_Disanbled
功 能: 禁止Ctrl+Esc
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_CtrlEsc_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_CtrlEsc_Eanbled
功 能: 使用Ctrl+Esc
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_CtrlEsc_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_WINkeys_Disanbled
功 能: 禁止所有WIN键
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_WINkeys_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_WINkeys_Eanbled
功 能: 使用所有WIN键
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_WINkeys_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_CtrlF4_Disanbled
功 能: 禁止Ctrl+F4
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_CtrlF4_Disanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_CtrlF4_Eanbled
功 能: 使用Ctrl+F4
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: 无
备 注:
-------------------------------------------------------------------------------}
procedure Set_CtrlF4_Eanbled; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Get_Domain_IP
功 能: 域名解析为IP地址
作 者: SelonSoft
日 期: 2007.12.22
参 数: HostName: string = ''
返回值: string
备 注:
-------------------------------------------------------------------------------}
function Get_Domain_IP
(
HostName: string = '' //要解析的域名
): string; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Get_USBStor_ID
功 能: 获取USB-ID
作 者: SelonSoft
日 期: 2008.01.05
参 数: 无
返回值: PChar
备 注: USB设备被拨出后返回空值
-------------------------------------------------------------------------------}
function Get_USBStor_ID: PChar; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Set_IP_Address
功 能: 更改IP掩码及网关参数(即时生效)
作 者: SelonSoft
日 期: 2008.01.05
参 数: IPAddress, SubnetMask, IPGateway: PChar
返回值: Boolean
备 注: 可自由更改TCP/IP参数
-------------------------------------------------------------------------------}
function Set_IP_Address
(
IPAddress, //IP地址
SubnetMask, //子网掩码
IPGateway: PChar //网关
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Init_NetTalking
功 能: 初始化语音模块
作 者: SelonSoft
日 期: 2008.01.06
参 数: 无
返回值: Boolean
备 注:
-------------------------------------------------------------------------------}
function Init_NetTalking: Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: DeInit_NetTalking
功 能: 注销语音模块
作 者: SelonSoft
日 期: 2008.01.06
参 数: 无
返回值: Boolean
备 注:
-------------------------------------------------------------------------------}
function DeInit_NetTalking: Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Start_NetTalking
功 能: 开始语音对讲
作 者: SelonSoft
日 期: 2008.01.06
参 数: TalkToIP, Port: string
返回值: Boolean
备 注:
-------------------------------------------------------------------------------}
function Start_NetTalking
(
TalkToIP, //对方IP地址
Port: string //语音服务本地端口
): Boolean; stdcall; external HikRunSDK;
{-------------------------------------------------------------------------------
过程名: Stop_NetTalking
功 能: 停止语音对讲
作 者: SelonSoft
日 期: 2008.01.06
参 数: 无
返回值: Boolean
备 注:
-------------------------------------------------------------------------------}
function Stop_NetTalking: Boolean; stdcall; external HikRunSDK;
implementation
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -