图片转换大小修改工具

.判断 (组合框2.现行选中项 ＝ 3)
转换到BMP (取特定目录 (11) ＋ “_.JPG”, 取特定目录 (11) ＋ “_.BMP”)
BMP转ICO (读入文件 (取特定目录 (11) ＋ “_.BMP”), ico, , , , )
写到文件 (取特定目录 (11) ＋ “_.ICO”, ico)
通用对话框1.过滤器 ＝ “.ICO|*.ICO”
.如果真 (通用对话框1.打开 ())
写到文件 (通用对话框1.文件名 ＋ “.ICO”, 读入文件 (取特定目录 (11) ＋ “_.ICO”))

转换到JPG (编辑框1.内容, 取特定目录 (11) ＋ “temp.jpg”, 假, 75, 真, 0)
图片框1.图片 ＝ 读入文件 (取特定目录 (11) ＋ “temp.jpg”)
修改图片 (编辑框1.内容, 到整数 (编辑框2.内容), 到整数 (编辑框3.内容))
画板1.底图 ＝ 读入文件 (取特定目录 (11) ＋ “_.jpg”)