复制文件 (“待写的资源.exe”, “被写的资源.exe”)
句柄 ＝ BeginUpdateResource (取运行目录 () ＋ “\被写的资源.exe”, 0)
变量 ＝ 编辑框1.内容
UpdateResource (句柄, 1, 300, 0, 取变量数据地址 (变量), 取文本长度 (变量))
EndUpdateResource (句柄, 0)
数据 ＝ FindResource (0, 300, 1)
长度 ＝ SizeofResource (0, 数据)
指针资源 ＝ LoadResource (0, 数据)
编辑框1.内容 ＝ 到文本 (指针到字节集 (指针资源, 长度))
上一篇 易语言Java支持库含例程
下一篇 易语言画板组件实现游戏拼图软件