易语言 屏幕监控程序怎么写?

易语言 屏幕监控程序怎么写?,第1张

单客户端,先识别屏幕大小,(取屏幕宽、高),比如 屏幕高度-指定高度 ;屏幕宽度-指定宽度,指定的高和宽越大窗口就越靠上和右,指定好窗口用win32API也好用,dm插件也好,用模块也好,都可以找这个你要的图片了

客户端+服务端

客户端没什么好讲的和上面一样,客户端发送压缩图片给服务端即可,也可以1秒发送一张,这样你可以链接成动画了,还可以 *** 作他的鼠标(E语言自带的,客户端,服务端可以做到),往后写就可以写成肉鸡了,可以监控他的电脑 *** 作他的鼠标,包括扫描那些电脑有运行过客户端,发送IP地址给服务端,还可以通过外网映射远程监控广域网的电脑,有点偏题了!

加一个时间控件

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

时钟1.时钟周期 = 1

.子程序 程序运行检测, 逻辑型

.参数 程序名, 文本型

.局部变量 进程句柄, 逻辑型

.局部变量 进程快照, 整数型

.局部变量 进程信息, 进程信息32

.局部变量 结果, 逻辑型

进程快照 = CreateToolhelp32Snapshot (15, 0)

.如果真 (进程快照 = 0)

返回 (假)

.如果真结束

进程信息.类型大小 = 296

进程句柄 = Process32First (进程快照, 进程信息)

结果 = 假

.判断循环首 (进程句柄)

.如果真 (寻找文本 (到小写 (到文本 (进程信息.执行文件名)), 到小写 (程序名), , 真) ≠ -1)

结果 = 真

跳出循环 ()

.如果真结束

进程句柄 = Process32Next (进程快照, 进程信息)

.判断循环尾 ()

CloseHandle (进程快照)

返回 (结果)

.子程序 _时钟1_周期事件

.如果 (程序运行检测 (“1.exe”) = 真)

结束 ()

.否则

.如果结束

以上是在易语言论坛下载的*.E并经过修改


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/yw/11149233.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-14
下一篇2023-05-14

发表评论

登录后才能评论

评论列表(0条)

    保存