复制文件 (“待配置.exe”, “已配置.exe”)
数据 = 编辑框1.内容
句柄 = BeginUpdateResource (“已配置.exe”, 0)
.如果真 (句柄 ≠ 0)
.如果真 (UpdateResource (句柄, 10, 1000, 0, 取变量数据地址 (数据), 取文本长度 (数据)) ≠ 0)
.如果真 (EndUpdateResource (句柄, 0) ≠ 0)
信息框 (“配置成功”, 0, )
上一篇 彗星正则表达式调试工具
下一篇 操作简单的ftp管理软件