易语言实现使用系统自带画图软件 mspaint 打开《位图》数据类型 (返回逻辑型)

CNWTEPRG

1. 
   
2. .版本 2
   
3. .支持库 BmpOperate
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. 
   
10. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 _临时子程序
    
14. .局部变量 位图, 位图
    
15. 
    
16. 位图.创建 (256, 256, 24, #紫色)
    
17. 检查 (位图_画图打开 (位图))
    
18. 
    
19. .子程序 位图_画图打开, 逻辑型, 公开, 使用系统自带画图软件 mspaint 打开位图，成功返回真失败返回假
    
20. .参数 位图, 位图
    
21. .局部变量 数据, 字节集
    
22. .局部变量 临时文件名, 文本型
    
23. 
    
24. 数据 ＝ 位图.取位图数据 ()
    
25. 临时文件名 ＝ 取临时文件名 ()
    
26. .判断开始 (数据 ＝ {  })
    
27.     返回 (假)
    
28. .判断 (写到文件 (临时文件名, 数据) ＝ 假)
    
29.     返回 (假)
    
30. .判断 (运行 (“mspaint ” ＋ #引号 ＋ 临时文件名 ＋ #引号, 假, ) ＝ 假)
    
31.     返回 (假)
    
32. .默认
    
33. 
    
34. .判断结束
    
35. 返回 (真)
    
36. 
    

复制代码

1心1亿

占个沙发