var
myReg:TRegistry;
begin
      myReg:=TRegistry.Create;
      myReg.RootKey:=HKEY_LOCAL_MACHINE;
      myReg.OpenKey ('SoftWare\Microsoft\Windows\CurrentVersion\Run',False);
      myReg.DeleteKey('Project');
      myReg.CloseKey;
      myReg.Free;
无法删除Project的键值哦~~出了什么错吗~~

解决方案 »

  1.   

    删除键值.你得到DELETE的键值了没有?
      

  2.   

    如何才能得到键值哦~~我是第一次用这个命令的哦~~~我开始的时候创建了Project的键,不知道删除怎样写哦~~~
      

  3.   

    if not (Key in ['0'..'9', Char(VK_BACK)]) then
          begin
            if not  (key   in   ['0'..'9','.',#13,#8])   then
          begin
              key:=#0;
              showmessage('只能输入小数点和数字!');
          end;
        end;
    这个是关于DELPHI只能输入小数点还有删除键的键值,你看看吧!~
    没事给你写了
      

  4.   

    var 
    myReg:TRegistry; 
    begin 
                myReg:=TRegistry.Create; 
                myReg.RootKey:=HKEY_LOCAL_MACHINE; 
                myReg.OpenKey   ( 'SoftWare\Microsoft\Windows\CurrentVersion\Run ',False); 
                myReg.DeleteValue(value);//必须先删除相对应的子键,value:子键名称
                myReg.DeleteKey( 'Project ');             myReg.Free;