[HKEY_LOCAL_MACHINE\SOFTWARE\www] 
"Register"="喍聊喍sH" 
"time"="0" 
"Date"="2019年12月11日" 最好是把源码打包一下发到我邮箱 [email protected]  ,因为我是新手呀。谢谢啦· 
茫茫人海之中,我想还是有好心人帮忙的吧,

解决方案 »

  1.   

    茫茫人海中,我来帮你
    users    registry;.........procedure TForm1.Button1Click(Sender: TObject);
    var
      Reg: TRegistry;
    begin
      Reg := TRegistry.Create;
      try
        Reg.RootKey := HKEY_CURRENT_USER;
        if Reg.OpenKey('HKEY_LOCAL_MACHINE\SOFTWARE\www', True) then
        begin
          Reg.WriteString('Register','喍聊喍sH');
          Reg.WriteInteger('time',0);
          Reg.WriteString('Date',FormatDateTime('yyyy年mm月dd日',now));
          Reg.CloseKey;
        end;
      finally
        Reg.Free;
      end;
    end;
      

  2.   

    已经全部搞定,多谢gzmhero  的真情回答,多谢。好人一生平安