精易论坛

标题: 设置文件夹图标 [打印本页]

---

作者: 528235171    时间: 2018-2-1 11:24
标题: 设置文件夹图标


先上效果图

这个方法说起来其实非常简单
把文件夹属性设置为系统，在文件夹下写出一个文件，设置为隐藏+系统就OK的
代码如下

---

作者: 阿婆    时间: 2018-2-1 22:03
学习 感谢分享

---

作者: qiuyingjia    时间: 2018-2-1 22:48
可以的，支持

---

作者: 阿婆    时间: 2018-2-1 23:10
改进了下，更改完图标及时生效，雷锋不谢！

  

子程序名	返回值类型	公开	备 注
DirSetIcon
参数名	类 型	参考	可空	数组	备 注
sDir	文本型				文件夹路径
sIconPath	文本型				如：“%SystemRoot%\system32\Shell32.dll,43” 如：“./wmp.ico,0”

变量名	类 型	静态	数组	备 注
ini	文本型			desktop.ini

ini ＝ sDir ＋ 选择 (取文本右边 (sDir, 1) ＝ “\”, “”, “\”) ＋ “desktop.ini”
置文件属性 (sDir, #系统文件 )
写配置项 (ini, “.ShellClassInfo”, “IconResource”, sIconPath)
置文件属性 (ini, #系统文件 ＋ #隐藏文件 )
PostMessageA (GetDesktopWindow (), 256, #F5键, 0)  ' WM_KEYDOWN
SHChangeNotify ( #SHCNE_ASSOCCHANGED, #SHCNF_FLUSH, 0, 0)

.版本 2<br /> <br /> .子程序 DirSetIcon, , 公开<br /> .参数 sDir, 文本型, , 文件夹路径<br /> .参数 sIconPath, 文本型, , 如：“%SystemRoot%\system32\Shell32.dll,43” 如：“./wmp.ico,0” <br /> .局部变量 ini, 文本型, , , desktop.ini<br /> <br /> ini ＝ sDir ＋ 选择 (取文本右边 (sDir, 1) ＝ “\”, “”, “\”) ＋ “desktop.ini”<br /> 置文件属性 (sDir, #系统文件)<br /> 写配置项 (ini, “.ShellClassInfo”, “IconResource”, sIconPath)<br /> 置文件属性 (ini, #系统文件 ＋ #隐藏文件)<br /> PostMessageA (GetDesktopWindow (), 256, #F5键, 0)  ' WM_KEYDOWN<br /> SHChangeNotify (#SHCNE_ASSOCCHANGED, #SHCNF_FLUSH, 0, 0)

  

常量名称	常量值	公 开	备 注
SHCNE_ASSOCCHANGED	134217728
SHCNF_FLUSH	4096

.版本 2<br /> <br /> .常量 SHCNE_ASSOCCHANGED, "134217728"<br /> .常量 SHCNF_FLUSH, "4096"

  

DLL命令名	返回值类型	公开	备 注
SHChangeNotify			刷新关联图标
DLL库文件名:
shell32
在DLL库中对应命令名:
SHChangeNotify
参数名	类 型	传址	数组	备 注
SHCNE_ASSOCCHANGED	整数型			134217728
SHCNF_IDLIST	整数型			0
nil	整数型			0
nil	整数型			0

DLL命令名	返回值类型	公开	备 注
PostMessageA	整数型		投递消息
DLL库文件名:
user32.dll
在DLL库中对应命令名:
PostMessageA
参数名	类 型	传址	数组	备 注
hWnd	整数型
Msg	整数型
wParam	整数型
lParam	整数型

.版本 2<br /> <br /> .DLL命令 SHChangeNotify, , "shell32", "SHChangeNotify", , 刷新关联图标<br />     .参数 SHCNE_ASSOCCHANGED, 整数型, , 134217728<br />     .参数 SHCNF_IDLIST, 整数型, , 0<br />     .参数 nil, 整数型, , 0<br />     .参数 nil, 整数型, , 0<br /> .版本 2<br /> <br /> .DLL命令 PostMessageA, 整数型, "user32.dll", "PostMessageA", , 投递消息<br />     .参数 hWnd, 整数型<br />     .参数 Msg, 整数型<br />     .参数 wParam, 整数型<br />     .参数 lParam, 整数型

---

作者: 1279868433    时间: 2018-2-1 23:33

1623863129 发表于 2018-2-1 21:07
把文件夹属性设置为系统，在文件夹下写出一个文件，设置为隐藏+系统就OK的
代码如下

还有这样灌水的？

---

作者: 528235171    时间: 2018-2-1 23:34

1279868433 发表于 2018-2-1 23:33
还有这样灌水的？

没看见隐藏了吗

---

作者: 伤小磊    时间: 2018-2-2 02:48
666只改为系统数学3不就可用了

---

作者: 网络注册会员    时间: 2018-2-2 08:59
看下原理是什么

---

作者: sktyou    时间: 2018-2-2 09:44
下载学习一下

---

作者: 工程师8421    时间: 2018-2-2 10:09
设置文件夹图标

---

作者: lijian254654299    时间: 2018-2-2 11:02
6666666666666666

---

作者: 花开一半    时间: 2018-2-2 12:25
谢谢分享啊

---

作者: kai4246    时间: 2018-2-3 11:03

下载学习一下

---

作者: 1065427958    时间: 2018-2-3 12:24
6666666666666666

---

作者: hhhql    时间: 2018-2-3 12:27
下载学习一下

---

作者: 摆地摊卖回忆    时间: 2018-2-3 13:31
哇，下载学习一下

---

作者: zeng20160808    时间: 2018-2-3 17:28
下载学习一下

---

作者: chi1187141761    时间: 2018-2-3 22:07
6666666666666666666666666

---

作者: 拿破锅仑    时间: 2018-2-4 02:23

---

作者: xiaole1118    时间: 2018-2-4 09:18
666啊            

---

作者: gaoqing    时间: 2018-2-5 15:09
谢谢分享试试、

---

作者: 天空飞翔    时间: 2018-2-5 20:46
谢谢分享啊

---

作者: 8554308    时间: 2018-2-6 12:54
%D1%A7%CF%B0%C1%CB%B0%A1%B0%A1%BA%C7%BA%C7

---

作者: 8554308    时间: 2018-2-7 09:56
学习了啊啊啊啊。

---

作者: shuxiang    时间: 2019-6-26 11:32

阿婆 发表于 2018-2-1 23:10
改进了下，更改完图标及时生效，雷锋不谢！

[e=1].版本 2

还是不行！就是不显示图标

---

作者: 曲终人散    时间: 2023-5-18 13:58
感谢分享，辛苦了，论坛有你更精彩

---

作者: tank2012t    时间: 2024-7-9 08:29
我已测试  好使

---

作者: 卿卿吖    时间: 2025-4-18 06:53
时好时坏怎么回事，一会有效果一会没效果

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4