打开指定的图片

深思

现在的问题是我要打开指定目录下的一张图片，例如，我有图片目录，这目录下有10张图片，我要用按钮点击图片1，可以打开图片目录并选中图片1，就好像谷歌浏览器打开下载的文件一样，选择“在文件夹中显示”，就会打开目录并显示那个文件。说这么多，不知你们看得懂不

heiyi

精易模块命令：文件_定位 ()

      子程序名：文件_定位
    打开指定文件的目录,并选中该文件
    参数<1>的名称为“文件路径”，类型为“文本型”。

萧阳天

1. .版本 2
   
2. .支持库 const
   
3. 
   
4. .子程序 打开文件所在位置, 逻辑型, 公开, 成功则打开文件所在目录并选中文件，失败返回假,本命令为初级命令！
   
5. .参数 欲定位的文件名称, 文本型, , 需提供文件绝对路径
   
6. .局部变量 lngPidl, 整数型
   
7. .局部变量 lngRet, 整数型
   
8. .局部变量 strFile, 文本型
   
9. .局部变量 返回值, 逻辑型
   
10. 
    
11. strFile ＝ 删首尾空 (欲定位的文件名称)
    
12. .如果 (文件是否存在_模块 (strFile) ＝ 假)
    
13.     返回值 ＝ 假
    
14. .否则
    
15.     lngPidl ＝ SHCreateFromPath (strFile)
    
16.     处理事件 ()
    
17.     .如果 (lngPidl ≠ 0)
    
18.         lngRet ＝ SHOpenFolderAndSelectItems (lngPidl, 0, 0, 0)
    
19.         .如果 (lngRet ＝ 0)
    
20.             返回值 ＝ 真
    
21.         .否则
    
22.             返回值 ＝ 假
    
23.         .如果结束
    
24. 
    
25.     .否则
    
26.         返回值 ＝ 假
    
27.     .如果结束
    
28. 
    
29. .如果结束
    
30. SHFree (lngRet)
    
31. 返回 (返回值)
    
32. 
    
33. .子程序 文件是否存在_模块, 逻辑型, 公开, 系统核心支持库->磁盘操作 判断指定的磁盘文件是否真实存在。如存在返回真，否则返回假。本命令为初级命令。
    
34. .参数 欲测试的文件名称, 文本型, , 需提供文件绝对路径
    
35. .局部变量 tpWfd, 查找的文件信息_
    
36. .局部变量 lngFile, 整数型
    
37. .局部变量 返回值, 逻辑型
    
38. 
    
39. 处理事件 ()
    
40. lngFile ＝ 查找文件_ (欲测试的文件名称, tpWfd)
    
41. .如果 (lngFile ≠ #INVALID_HANDLE_VALUE)
    
42.     返回值 ＝ 真
    
43.     关闭搜索句柄_ (lngFile)
    
44. .否则
    
45.     返回值 ＝ 假
    
46. .如果结束
    
47. 返回 (返回值)
    
48. 
    
49. .子程序 通用定位文件, 逻辑型, 公开, 成功则打开文件所在目录并选中文件，失败返回假,本命令为初级命令！
    
50. .参数 欲定位的文件名称, 文本型, , 需提供文件绝对路径
    
51. .局部变量 返回值, 逻辑型
    
52. 
    
53. .如果 (运行 (“Explorer.exe /e ,/select, ” ＋ 欲定位的文件名称, 假, ))
    
54.     返回值 ＝ 真
    
55. .否则
    
56.     返回值 ＝ 假
    
57. .如果结束
    
58. 返回 (返回值)
    

复制代码

’这有两种方法 非模块，一种是高级API，还有一种是通用法，直接上源码；
源码：http://www.3600gz.cn/thread-120898-1-1.html

深思

heiyi 发表于 2012-9-3 17:00
精易模块命令：文件_定位 ()

      子程序名：文件_定位

嗯，可以用，謝謝

深思

萧阳天 发表于 2012-9-3 18:31
’这有两种方法 非模块，一种是高级API，还有一种是通用法，直接上源码；
源码：http://www.3600gz.cn/thr ...

你的也可以用，不過樓上已經有答案了，謝謝