.版本 2
.支持库 iext2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.如果真 (寻找文本 (编辑框1.内容, “base64,”, , 假) ≠ -1)
编辑框1.内容 = 文本_取右边 (编辑框1.内容, “base64,”)
.如果真结束
图片框1.图片 = 编码_BASE64解码 (编辑框1.内容)
.子程序 _图片框1_鼠标右键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
通用对话框.初始目录 = 取运行目录 ()
.如果真 (通用对话框.打开 ())
图片框1.图片 = 读入文件 (通用对话框.文件名)
.如果真结束
.子程序 _按钮2_被单击
.局部变量 图片, 字节集
.局部变量 图片码, 文本型
图片 = 图片框1.图片
图片码 = 编码_BASE64编码 (图片)
编辑框1.内容 = 图片码
.子程序 _按钮3_被单击
.如果真 (寻找文本 (编辑框1.内容, “base64,”, , 假) ≠ -1)
返回 ()
.如果真结束
编辑框1.内容 = “data:image/png;base64,” + 编辑框1.内容
.子程序 __启动窗口_创建完毕
皮肤_加载 (#皮肤_svip)