右键菜单“复制到文件夹”和“移动到文件夹”.doc
文本预览下载声明
“复制到文件夹”和“移动到文件夹”
单击“开始”菜单，选择“运行”命令，在“运行”对话框中输入“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根键下，就有几个
显示全部