右键菜单“复制到文件夹”与“移动到文件夹”.doc

右键菜单“复制到文件夹”与“移动到文件夹”.doc

  1. 1、本文档共5页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
右键菜单“复制到文件夹”与“移动到文件夹”

“复制到文件夹”和“移动到文件夹” 单击“开始”菜单,选择“运行”命令,在“运行”对话框中输入“regedit”打开注册表编辑器,依次展开HKEY_CLASSES_ROOT\All FilesystemObjects\shellex\ContextMenuHandlers分支, 在ContextMenuHandlers分支下新建两个项,然后分别命名为“Copy To”和“Move TO”, 然后将“Copy To”的默认值改为“{C2FBB630-2971-11D1-A18C-00C04FD75D13}”。 将“Move To”默认值改为“{C2FBB631-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

您可能关注的文档

文档评论(0)

xcs88858 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:8130065136000003

1亿VIP精品文档

相关文档