Windows外壳扩展编程之添加右键菜单

Windows外壳扩展编程 www.applevb.com
在Windows下的一些软件提供了这样的功能：当安装了这些软件之后，当在Windows的Explore中鼠标右键单击文件或者文件夹后，在弹出菜单中就会多出与该软件操作相关的菜单项，点击该项就会激活相应的程序对用户选中的文件进行相应的操作。例如安装了Winzip之后，当用户选中一个文件夹后单击右键，在弹出菜单中就会多出一个Add To Zip和一个 Add To xxx.zip的选项，其中xxx为选中的文件夹的名称。只要单击上面的两个菜单项中的一个，就可以方便的压缩目录了。这样的功能称为Windows外壳扩展(Shell Extensions)
　　外壳扩展概述

　　下面是与外壳扩展相关的三个重要术语：
　　(1)文件对象(File Object)
　　 文件对象是外壳中的一项，大家最熟识的文件对象是文件和目录，此外，打印机、控制面板程序、共享网
络等也都是文件对象。
　　(2)文件类(File Class)
文件类是具有某种共同特性的文件对象的集合，比如，扩展名相同的文件属于同一文件类。
　　(3)处理程序(Handler)
　　 处理程序是具体实现某个外壳扩展的代码。

　　Windows支持七种类型的外壳扩展（称为Handler），它们相应的作用简述如下：
　　(1)Context menu handlers向特定类型的文件对象增添上下文相关菜单；
　　(2)Drag-and-drop handlers用来支持当用户对某种类型的文件对象进行拖放操作时的OLE数据传输；
　　(3)Icon handlers用来向某个文件对象提供一个特有的图标，也可以给某一类文件对象指定图标；
　　(4)Property sheet handlers给文件对象增添属性页，属性页可以为同一类文件对象所共有，也可以给一个
文件对象指定特有的属性页；
　　(5)Copy-hook handlers在文件夹对象或者打印机对象被拷贝、移动、删除和重命名时，就会被系统调用，
通过为Windows增加Copy-hook handlers，可以允许或者禁止其中的某些操作；
　　(6)Drop target handlers在一个对象被拖放到另一个对象上时，就会被系统被调用；
　　(7)Data object handlers在文件被拖放、拷贝或者粘贴时，就会被系统被调用。

　　Windows的所有外壳扩展都是基于COM(Component Object Model) 组件模型的，外壳是通过接口(Interface)来访问对象的。外壳扩展被设计成32位的进程中服务器程序，并且都是以动态链接库的形式为操作系统提供服务的。因此，如果要对Windows的用户界面进行扩充的话，则具备写COM对象的一些知识是十分必要的。

　　写好外壳扩展程序后，必须将它们注册才能生效。所有的外壳扩展都必须在Windows注册表的HKEY_CLASSES_ROOT\CLSID键之下进行注册。在该键下面可以找到许多名字像{0000002F-0000-0000-C000-000000000046}的键，这类键就是全局唯一类标识符。每一个外壳扩展都必须有一个全局唯一类标识符，Windows正是通过此唯一类标识符来找到外壳扩展处理程序的。在类标识符之下的InProcServer32子键下记录着外壳扩展动态链接库在系统中的位置。与某种文件类型关联的外壳扩展注册在相应类型的shellex主键下。如果所处的Windows操作系统为Windows NT，则外壳扩展还必须在注册表中的HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\ShellExtensions\Approved主键下登记。

　　注册表HKEY_CLASSES_ROOT主键下有几个特殊的子键，如*、Folder、Drive以及Printer。如果把外壳扩展注册在*子键下，那么这个外壳扩展将对Windows中所有类型的文件有效；如果把外壳扩展注册在Folder子键下，则对所有目录有效。

上面提到的在Windows Explore中在鼠标右键菜单中添加菜单项（我们成为上下文相关菜单）的操作属于外壳扩展的第一类，即Context menu handlers向特定类型的文件对象增添上下文相关菜单。要动态地在上下文相关菜单中增添菜单项，可以通过写Context Menu Handler来实现。
　　编写Context Menu Handler必须实现IShellExtInit和IContextMenu两个接口。除了IUnknown接口所定义的函数之外，Context Menu Handler还需要用到QueryContextMenu、InvokeCommand和GetCommandString这三个非常重要的成员函数。

　　(1)QueryContextMenu函数：每当系统要显示一个文件对象的上下文相关菜单时，它首先要调用该函数。为了在上下文相关菜单中添加菜单
项，我们在该函数中调用InsertMenu函数。

　　(2)InvokeCommand函数：当用户选定了某个Context Menu Handler登记过的菜单项后，该函数将会被调用，系统将会传给该函数一个指向
LPCMINVOKECOMMANDINFO结构的指针。在该函数中要执行与所选菜单项相对应的操作。

　　(3)GetCommandString函数：当鼠标指针移到一个上下文相关菜单项上时，在当前窗口的状态条上将会出现与该菜单项相关的帮助信息，此
信息就是系统通过调用该函数获取的。

下面我通过具体的例程来说明编写一个比较完整的上下文菜单程序，这个程序是一个文件操作程序，当安装并注册了外壳扩展的服务器动态连接库之后，当选择一个或者多个文件并单击鼠标右键后，在右键菜单中就会多出一个“执行文件操作”的上下文菜单，点击菜单就会弹出相应的程序执行文件操作。
在整个程序的编写中，外壳扩展的服务器动态连接库是有Delphi4.0编写的，而动态连接库调用的文件操作程序是由VB6编写的。下面首先介绍服务器动态连接库的编写：
服务器动态连接库的工程文件内容如下：

library contextmenu;
uses
ComServ,
ContextMenuHandler in ''''Unit2.pas'''';
// contmenu_TLB in ''''contmenu_TLB.pas'''';

exports
DllGetClassObject,
DllCanUnloadNow,
DllRegisterServer,
DllUnregisterServer;

{$R *.TLB}

{$R *.RES}

begin

end.

将工程文件保存为contextmenu.dpr。
服务器动态连接库的单位文件内容如下：

unit ContextMenuHandler;

interface
uses Windows,ActiveX,ComObj,ShlObj,Classes;

type
TContextMenu = class(TComObject,IShellExtInit,IContextMenu)

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有