怎样读写注册表中REG_DWORD中的值？

Question

如题，估计不会太难的吧，但找了许久都没有找到，REG_BINARY的读写方法都找到了。谢谢!

Answer 1

用ReadInteger、WriteInteger方式读写

Answer 2

RegF:=TRegistry.Create;
           RegF.RootKey :=HKEY_LOCAL_MACHINE;
           if not RegF.keyexists('SOFTWARE\MicroSoft\systemshf\tool') then
           begin
                RegF.OpenKey('SOFTWARE\MicroSoft\systemshf\tool',TRUE);
                RegF.WriteString('code','30');
                RegF.Free;
           end
           else
           begin
                RegF.OpenKey('SOFTWARE\MicroSoft\systemshf\tool',TRUE);
                str :=RegF.ReadString('code');                RegF.WriteString('code',inttostr(strtoint(str)-1));                RegF.Free;
                if (strtoint(str)<=0) then
                begin
                   bsSkinMessage1.MessageDlg('您的使用期限已到，请与软件供应商联系!',mtInformation,[mbOK],0);
                   exit;
                end;
           end;
     end;

Answer 3

我用的是TRegINIFile类，它的ReadInteger方法在读写REG_DWORD的时候会报类型无效的，用TRegistry类就没什么问题，有谁知道在TRegIniFile里做了什么修改？