abalad/Delphi_Remote_Access_PC
GitHub: abalad/Delphi_Remote_Access_PC
基于 Delphi 开发的远程桌面控制工具,采用 RFB 增量算法实现屏幕共享、文件传输、键盘模拟和即时聊天功能。
Stars: 21 | Forks: 31
# Delphi_Remote_Access_PC
Delphi 7 和 Delphi XE5 远程访问(含文件共享、聊天和窗体继承)
Delphi 7 和 Delphi XE5 远程访问(含文件共享、聊天和窗体继承)
```
Esta source foi criada por Maickonn Richard.
Contato: senjaxus@gmail.com
A distribuição desta source é gratuita!
NÃO ME RESPONSABILIZO PELO MAU USO DESTA SOURCE.
```
功能:
* 采用 RFB 算法的远程访问(仅捕获屏幕上发生变化的部分)。
* 数据压缩。
* 文件共享。
* 聊天。
* 窗体继承(允许您在多个窗口中同时访问多台机器)。
软件视频:
https://www.youtube.com/watch?v=bq_2-Dxu2R0
#所有使用的组件均为 Delphi 原生组件。
当您打开项目时,可能会出现一条消息提示缺少组件。
您需要执行以下步骤:
-> Delphi 7:
* 打开 Delphi,进入 "Component" 菜单。
* 接着点击 "Install Packages..."。
* 点击 "Add" 按钮。
* 进入 Delphi 的安装目录,然后进入 "Bin" 文件夹。(C:\Program Files (x86)\Borland\Delphi7\Bin)
* 选择 "dclsockets70.bpl" 文件并点击打开。
* 关闭 Delphi 并重新打开项目。
-> Delphi XE5:
* 打开 Delphi,进入 "Component" 菜单。
* 接着点击 "Install Packages..."。
* 点击 "Add" 按钮。
* 进入 Delphi 的安装目录,然后进入 "Bin" 文件夹。(C:\Program Files (x86)\Embarcadero\RAD Studio\12.0\bin)
* 选择 "dclsockets190.bpl" 文件并点击打开。
* 关闭 Delphi 并重新打开项目。
在 Units 文件夹中,您将找到:
* Unit zLibEx.pas 及 zLib 文件夹 —— 用于压缩数据。(您需要将 zLib 文件夹复制到项目中)。
* StreamManager.pas —— 用于捕获屏幕并进行比较。
* SndKeys32.pas —— 用于模拟按键。
软件工作原理。
* 客户端连接到服务器。当连接第一个 Socket 时,它将连接其他 Socket,
这些 Socket 用于定义是用于图像传输、文件上传下载还是远程键盘操作。
第一个 Socket 传输消息、鼠标位置和鼠标点击。
* 服务器请求第一张图像。客户端将捕获屏幕(以 8 位 Bitmap 格式捕获以减小大小),
然后进行 zLib 压缩。压缩后将发送第一张图像,并随后将其保存在内存中。
当服务器收到图像时,它将请求另一张图像,此时客户端将与旧图像进行比较,并仅发送
发生变化的部分。(始终压缩数据)。
标签:Delphi 7, Delphi XE5, PE 加载器, RAT, RFB算法, VCL组件, Windows编程, zLib, 套接字编程, 屏幕共享, 开源远程管理, 数据压缩, 文件传输, 桌面控制, 端点可见性, 网络通信, 聊天功能, 表单继承, 远程控制, 远程桌面, 远程访问