注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

BCB-DG's Blog

...

 
 
 

日志

 
 

DGSpy SDK (v0.3)  

2009-08-25 11:20:45|  分类: VNC |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

Update to 0.3f

DGSpy SDK (v0.3) - BCB-DG - BCB-DGs Blog

0.3f只有一個DGSpy.dll文件

0.3f支持桌面切換(VISTA之後沒用),只要是服務進程就會有效果,

提供CCad函數用於發送Ctrl+Alt+Delete組合鍵,另外修正了鼠標的軌跡顯示。

============================================================================

本DLL采用消息方式与主程序通信,故需要在主程序中自定义消息处理函数

============================================================================

消息参数说明:

正向连接
服务端:
WParam: 事件(deConnected, deDisconnected)
LParam: 客户端实例

客户端:
WParam: 事件(deConnected, deConnError, deDisconnected, deScrInfo, deScrData)
LParam: 客户端实例

----------------------------------------------------------------------------

反向连接(函数名后都加了I)
服务端:
WParam: 接事件(deConnected, deDisconnected, deScrInfo, deScrData)
LParam: 客户端实例(使用这个实例进行操作)

客户端:
WParam: 事件(deConnected, deConnError, deDisconnected)
LParam: 客户端实例

============================================================================

导出函数:

procedure About; stdcall;
功能:关于,显示版本与信息
参数:无

----------------------------------------------------------------------------

正向连接
服务端:

function StartServer(nPort: Integer; pPwd: PChar; PFmt: Byte; nHwnd, nMsg: DWORD): DWORD; stdcall;
功能:开始一个服务端实例,程序结束时必须停止这个实例,否则可能会进程不退出
参数:监听端口,安全密码,画面颜色数,消息句柄,消息值
返回:大于0为服务端实例,否则失败。

procedure StopServer(pSvr: DWORD); stdcall;
功能:停止一个服务端实例
参数:StartServer返回的实例

function ClientCount(pSvr: DWORD): Integer; stdcall;
功能:得到一个服务实例的客户端数量
参数:StartServer返回的实例

procedure ClientInfo(pClt: DWORD; pIP: PChar; pPort: PInteger); stdcall;
功能:得到一个客户端的远程IP地址和端口
参数:客户端实例,IP地址缓冲区,端口
注意:IP地址缓冲区的长度需要16字节以上,否则会溢出

procedure DisconClient(pClt: DWORD); stdcall;
功能:断开一个客户端
参数:客户端实例

----------------------------------------------------------------------------

正向连接
客户端:
function StartClient(pHost: PChar; nPort: Integer; pPwd: PChar; nHwnd, nMsg: DWORD): DWORD; stdcall;
功能:开始一个客户端实例,程序结束时必须停止这个实例
参数:远程地址,远程端口,安全密码,消息句柄,消息值
返回:大于0为客户端实例,否则失败。

procedure StopClient(pClt: DWORD); stdcall;
功能:停止一个客户端实例
参数:StartClient返回的实例

procedure GetScrSize(pClt: DWORD; pWidth, pHeight, pBits: PInteger); stdcall;
功能:deScrInfo消息后可以获取远程桌面的宽、高、定义的颜色数
参数:StartClient返回的实例,需要返回的宽、高、颜色数

procedure GetDataSize(pClt: DWORD; pFram, pRSize, pPSize: PInteger); stdcall;
功能:deScrData消息后可以获取的总共的帧数、当前帧的网络包大小与当前实际帧的数据大小
参数:StartClient返回的实例,需要返回的帧数、网络包大小、数据大小

function SaveBmp(pClt: DWORD; pFile: PChar): BOOL; stdcall;
功能:保存当前图片为BMP
参数:StartClient返回的实例,BMP路径
返回:保存成功或失败

function StartRecord(pClt: DWORD; pFile: PChar): BOOL; stdcall;
功能:开始录制MPEG录像,必须在一帧以上后,而且之前未录像才行
参数:StartClient返回的实例,MPEG录像路径
返回:保存成功或失败

procedure StopRecord(pClt: DWORD); stdcall;
功能:停止录制MPEG录像
参数:StartClient返回的实例

procedure ShowScr1(pClt: DWORD; DC: HDC); stdcall;
功能:显示远程桌面图像
参数:StartClient返回的实例,要显示的DC

procedure ShowScr2(pClt: DWORD; DC: HDC; nLeft, nTop, nWidth, nHeight: Integer); stdcall;
功能:显示远程桌面图像(只显示指定的区域)
参数:StartClient返回的实例,要显示的DC,左上角坐标,宽、高度

procedure ShowScr3(pClt: DWORD; DC: HDC; nWidth, nHeight: Integer); stdcall;
功能:显示远程桌面图像(用于缩放显示)
参数:StartClient返回的实例,要显示的DC,宽、高度

procedure CMouse(pClt: DWORD; X, Y: Integer; bMove, bDown, bLeft: BOOL); stdcall;
功能:发送鼠标事件给远程桌面
参数:StartClient返回的实例,坐标,是否移动,是否按下,是否左键

procedure CKey(pClt: DWORD; Key: Word; bDown: BOOL); stdcall;
功能:发送键盘事件给远程桌面
参数:StartClient返回的实例,键值,是否按下

procedure CCad(pClt: DWORD); stdcall;
功能:发送Ctrl+Alt+Delete键盘事件给远程桌面,需要进程有服务权限
参数:StartClient返回的实例

----------------------------------------------------------------------------

反向连接(函数名后都加了I)
服务端:

function StartServerI(nPort: Integer; pPwd: PChar; nHwnd, nMsg: DWORD): DWORD; stdcall;
功能:开始一个服务端实例,程序结束时必须停止这个实例,否则可能会进程不退出
参数:监听端口,安全密码,消息句柄,消息值
注意:此密码为此服务端到连接回来的客户端验证
返回:大于0为服务端实例,否则失败。

procedure StopServerI(pSvr: DWORD); stdcall;
功能:停止一个服务端实例
参数:StartServerI返回的实例

function ClientCountI(pSvr: DWORD): Integer; stdcall;
功能:得到一个服务实例的客户端数量
参数:StartServerI返回的实例

procedure ClientInfoI(pClt: DWORD; pIP: PChar; pPort: PInteger); stdcall;
功能:得到一个客户端的远程IP地址和端口
参数:客户端实例,IP地址缓冲区,端口
注意:IP地址缓冲区的长度需要16字节以上,否则会溢出

procedure DisconClientI(pClt: DWORD); stdcall;
功能:断开一个客户端
参数:客户端实例

procedure GetScrSizeI(pClt: DWORD; pWidth, pHeight, pBits: PInteger); stdcall;
功能:deScrInfo消息后可以获取远程桌面的宽、高、定义的颜色数
参数:客户端实例,需要返回的宽、高、颜色数

procedure GetDataSizeI(pClt: DWORD; pFram, pRSize, pPSize: PInteger); stdcall;
功能:deScrData消息后可以获取的总共的帧数、当前帧的网络包大小与当前实际帧的数据大小
参数:客户端实例,需要返回的帧数、网络包大小、数据大小

function SaveBmpI(pClt: DWORD; pFile: PChar): BOOL; stdcall;
功能:保存当前图片为BMP
参数:客户端实例,BMP路径
返回:保存成功或失败

function StartRecordI(pSvr, pClt: DWORD; pFile: PChar): BOOL; stdcall;
功能:开始录制MPEG录像,必须在一帧以上后,而且之前未录像才行
参数:StartServerI返回的实例,客户端实例,MPEG录像路径
返回:保存成功或失败

procedure StopRecordI(pSvr, pClt: DWORD); stdcall;
功能:停止录制MPEG录像
参数:StartServerI返回的实例,客户端实例

procedure ShowScrI1(pClt: DWORD; DC: HDC); stdcall;
功能:显示远程桌面图像
参数:客户端实例,要显示的DC

procedure ShowScrI2(pClt: DWORD; DC: HDC; nLeft, nTop, nWidth, nHeight: Integer); stdcall;
功能:显示远程桌面图像(只显示指定的区域)
参数:客户端实例,要显示的DC,左上角坐标,宽、高度

procedure ShowScrI3(pClt: DWORD; DC: HDC; nWidth, nHeight: Integer); stdcall;
功能:显示远程桌面图像(用于缩放显示)
参数:客户端实例,要显示的DC,宽、高度

procedure CMouseI(pClt: DWORD; X, Y: Integer; bMove, bDown, bLeft: BOOL); stdcall;
功能:发送鼠标事件给远程桌面
参数:客户端实例,坐标,是否移动,是否按下,是否左键

procedure CKeyI(pClt: DWORD; Key: Word; bDown: BOOL); stdcall;
功能:发送键盘事件给远程桌面
参数:客户端实例,键值,是否按下

procedure CCadI(pClt: DWORD); stdcall;
功能:发送Ctrl+Alt+Delete键盘事件给远程桌面,需要进程有服务权限
参数:客户端实例

----------------------------------------------------------------------------

反向连接(函数名后都加了I)
客户端:

function StartClientI(pHost: PChar; nPort: Integer; pPwd: PChar; PFmt: Byte; nHwnd, nMsg: DWORD): DWORD; stdcall;
功能:开始一个客户端实例,程序结束时必须停止这个实例
参数:远程地址,远程端口,安全密码,消息句柄,消息值
注意:此密码为服务端到此客户端验证
返回:大于0为客户端实例,否则失败。

procedure StopClientI(pClt: DWORD); stdcall;
功能:停止一个客户端实例
参数:StartClientI返回的实例


============================================================================

DEMO 代码说明

VB6:
BServer.vbp  正向服务端
BClient.vbp  正向客户端
----------------------------------------------------------------------------
Delphi:
DServer.dpr  正向服务端
DService.dpr  正向服务模式服务端
DClient.dpr  正向客户端
DServerI.dpr  反向服务端
DClientI.dpr  反向客户端
============================================================================

Download:

http://iamgyg.ys168.com/

  评论这张
 
阅读(3367)| 评论(139)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017