Delphi2007编译服务引发WIN+E快捷键失效等一系列问题

[日总是我哥]

这里啰嗦了几点，文字比较多，只是想尽力把问题描述清楚，以备后用。临时码的子，没有校对，有不清楚的地方请提出。

一、问题的发现：
自己做的程序，突然接收不到WM_DEVICECHANGE消息，很是纳闷……最近都没有新安装软件，左思右想，前两天自己写了个svchost.exe调用的服务。索性将服务停止，程序能正常接受WM_DEVICECHANGE消息了。

庆幸的是自己写了的这么一个服务，要不然，还不知道什么时候才能发现问题所在-_-!!!
【注1】 关于消息问题在这里有记载：获取USB设备插拔消息的备忘
【注2】 还导致WIN+E等快捷键失效，按了WIN+E之后，任务栏停止响应，必须停止服务后，系统才响应WIN+E打开资源管理器

二、找出元凶
因为新鲜，以前也玩过svchost.exe调用的服务，但是也没有发现类似的问题。不知哪来的灵光一闪，用Delphi7.0编译，测试一切正常。
再次用Delphi2007编译，问题依旧。

三、罪魁祸首
发现这个问题有好些天，在心里一直放不下，陆陆续续几乎每天都要调试一下。
首先是怀疑自己新添加的代码有问题，将代码一行一行注释、删除，问题依旧存在。
无奈，只有将uses的单元一个一个去除，最终发现，问题出在Controls单元，如果将uses的Controls单元取消，系统一切正常。

四、结论
使用Delphi2007编译，而且引用了Controls单元，将引发WIN+E快捷键失效等一系列问

五、进一步研究
经过哈欠点拨：“你用工具查看一下它载入的DLL们....同D7比较一下”。果然，Delphi2007编译出的dll多载入了两项进程。
(c:\windows\system32\msctfime.ime、c:\windows\system32\apphelp.dll）
查看步骤：
1、启动服务
2、到DOS提示符状态，运行tasklist.exe /svc，查看服务名称为ServiceDll的进程ID
3、运行工具查看该进程载入的dll（我这里用的是老妖的Spy4Win->附加工具->进程管理)

六、服务程序说明
该服务框架从网上下载，考虑到方便安装和卸载，加入了DllRegisterServer,DllUnregisterServer两个函数，
安装服务：regsvr32.exe ServiceDll.dll
卸载服务：regsvr32.exe ServiceDll.dll
【注3】安装之后，应手动运行服务；卸载之前，应手动停止服务。

七、源程序
因为上传附件失败，这里直接贴出源程序。

[yanxizhen]

P.S. 当初这个代码是用来作坏事的,没有想到,居然还能有人拿来作好事,咔咔.

[Spring_叶子]

hoho~~~~~~~

[derelictangel]

我好笨啊，都看不懂，先回复一下好了，慢慢学习

PS:
我的目标是 ---->

^_^

[tjg5202]

好多星星。。。。。

[gongxu86824]

看热闹，顺便学习下》》》》》》》》》》》

[rightyeah]

up

[沉醉西亭]

太强悍

[我来看看CB]

好。。。。。。。。。。。。

[zhangxiaommmm]

因为新鲜，以前也玩过svchost.exe调用的服务
这是作什么的？

[oleboy]

刷分》》》》》》》》》》》》》》》》》

[zhangxiaommmm]

[Quote=引用 43 楼 CoolSlob 的回复:]
引用 41 楼 zhangxiaommmm 的回复:
因为新鲜，以前也玩过svchost.exe调用的服务
这是作什么的？


玩过还不知道？:)


结贴，这个问题定性为：使用Delphi2007编译在某些操作系统环境下将出现问题，暂无解。
[/Quote]

我没玩过，哪不是引用你的话吗？
随便问问是什么？

[teedry]

学习中~~

[火龙岛主]

搬个板凳听讲。

[日总是我哥]

[Quote=引用 41 楼 zhangxiaommmm 的回复:]
因为新鲜，以前也玩过svchost.exe调用的服务
这是作什么的？
[/Quote]

玩过还不知道？:)





结贴，这个问题定性为：使用Delphi2007编译在某些操作系统环境下将出现问题，暂无解。

[ctx62]

Mark一下

[huaihuai1110]

路过，看看，高科技

[码农天天向上]

高精尖技术！Mark！

[疯狂的犹太人]

学习学习呀

[HDAISEN]

好吧,我那个分..

[日总是我哥]

回头看了3年前的帖子~~~~~