右键菜单“复制到文件夹”和“移动到文件夹”.docVIP

“复制到文件夹”和“移动到文件夹” 单击“开始”菜单，选择“运行”命令，在“运行”对话框中输入“regedit”打开注册表编辑器，依次展开HKEY_CLASSES_ROOT＼All FilesystemObjects＼shellex＼ContextMenuHandlers分支， 在ContextMenuHandlers分支下新建两个项，然后分别命名为“Copy To”和“Move TO”， 然后将“Copy To”的默认值改为“{C2FBB630-2971-11D1-A18C-00C04FD75D13}”。怎样给右键添加“复制到文件夹”命令 复制到文件夹是一个非常好用的命令，在我们需要复制一个文件到特定位置的时候，我们只需要在该文件上右键单击即可完成操作。不必再复制然后再粘贴，非常繁琐。关键是，我们怎么添加这个命令到右键呢？ 风险提示： 修改注册表有一定得风险，应当严格按照本教程操作，如果修改以后出现系统问题，可以按照此教程把注册表修改到原先的样子 步骤/方法 首先我们按快捷键win+r打开运行。 2 输入regedit，然后点击确定。 3 找到hkey classes root文件夹。展开这个文件夹。 4 找到allfilessystemobjects文件夹，并展开它。 5 接着找到shellex文件夹，在shellex内找懂啊contextmenuhandlers 6 右键单击contextmenuhandlers，选择新建——项。 7 新建了一个文件夹，重新命名为复制到。 8 然后双击这个“复制到”，在右侧看到“默认，双击打开“默认” 9 输入如下字符：{C2FBB630-2971-11D1-A18C-00C04FD75D13}，点击确定以后，就完成了设置。 10 我们随便找到一个文件夹右键单击，你可以看到复制到文件夹命令了吗。 经验内容仅供参考，如果您需要解决具体问题（尤其在法律、医学等领域），建议您详细咨询相关领域专业人士。 uses registry 添加： procedure TForm1.Button1Click(Sender: TObject); var reg:tregistry; Filename:String; begin //Project1是我的EXE文件名，你的你要改 Filename:=Trim(ExtractFileDir(Application.Exename)+\\\Project1.exe\); reg:=tregistry.create ; reg.rootkey:=hkey_classes_root; if reg.OpenKey(\\\folder\\shell\,true) then if not Reg.KeyExists(\Project1\) then reg.createkey (\Project1\); if reg.OpenKey(\\\folder\\shell\\Project1\,true) then if not Reg.KeyExists(\command\) then reg.createkey (\command\); if reg.openkey (\\\folder\\shell\\Project1\\command\,true) then reg.writestring(\\,Filename); //\\连一起，不要按空格，默认值 SHOWMESSAGE(\已加入WINDOWS右键快捷方式\); reg.CloseKey; reg.free end; 删除: procedure TForm1.Button2Click(Sender: TObject); var reg:tregistry; begin reg:=tregistry.create ; reg.rootkey:=hkey_classes_root; if reg.OpenKey(\\\folder\\shell\,true) then if Reg.KeyExists(\Project1\) then reg.DeleteKey(\Project1\); reg.CloseKey; reg.free ; SHOWMESSAGE(\已从WINDOWS右键快捷方式中删除\); end; 以上只一类，更多 在hkey_classes_root根键下，就有几个