|
发表于 2024-9-19 18:14:05
|
显示全部楼层
广东省中山市
|
_图片框1_被双击 | 逻辑型 | | |
横向位置 | 整数型 | | | | 纵向位置 | 整数型 | | | | 功能键状态 | 整数型 | | | |
通用对话框1.初始目录 = 取运行目录 ()通用对话框1. 打开 ()图片框1.图片 = 读入文件 (通用对话框1.文件名 )如果真 (编辑框1.内容 = “”)信息框 (“请输入图片名称”, 0, , )如果真 (取反 (文件是否存在 (“C:\PZxx\config.ini”)) )如果真 (取反 (创建目录 (“C:\PZxx”)) )信息框 (“创建目录失败,请检查权限是否足够!”, 0, , )返回 ()如果真 (取反 (创建目录 (“C:\PZxx\Photo”)) )信息框 (“创建目录失败,请检查权限是否足够!”, 0, , )返回 ()如果真 (写到文件 (“C:\PZxx\Photo\” + 编辑框1.内容, 到字节集 (图片框1.图片 )) ) 如果真 (写配置项 (“C:\PZxx\config.ini”, “PZ1”, “T1”, 编辑框1.内容 )) 如果真 (写配置项 (“C:\PZxx\config.ini”, “PZ1”, “LJ1”, “C:\PZxx\Photo\” + 编辑框1.内容 )) 编辑框1.内容 = 读配置项 (“C:\PZxx\config.ini”, “PZ1”, “T1”, ) 图片框1.图片 = 读入文件 (读配置项 (“C:\PZxx\config.ini”, “PZ1”, “LJ1”, ))
需要加一个通用对话框。 |
|