代码保存在注册表中的设置

时间:2011-01-14 09:34:27

标签: delphi registry application-settings

我有一个弹出菜单..每次用户登录系统时,都会出现弹出菜单 但对于不希望此弹出窗口显示在屏幕上的用户,我使用复选框,以便每次登录时都不会显示弹出窗口。 我想如何在注册表中为保存复选框的用户保存设置 弹出菜单不显示

1 个答案:

答案 0 :(得分:5)

您可以使用TRegistry类从/向注册表读取/保存值 见帮助;有一些使用样本。

读一些像这样:

 RegNGFS:= TRegistry.Create;
   try
     RegNGFS.RootKey := HKEY_CURRENT_USER;
     if RegNGFS.OpenKey('SOFTWARE\NGFS', FALSE) then begin
       MaxSteps:= RegNGFS.ReadInteger('MaxSteps');
       StopIN:= RegNGFS.ReadInteger('StopIN');
     end;
   finally
     RegNGFS.Free;
   end;

对于写作,有些人喜欢这样:

   RegNGFS:= TRegistry.Create;
   try
     RegNGFS.RootKey := HKEY_CURRENT_USER;
     if RegNGFS.OpenKey('SOFTWARE\NGFS', TRUE) then begin
       RegNGFS.ReadInteger('MaxSteps', MaxSteps);
       RegNGFS.ReadInteger('StopIN', StopIN);
     end;
   finally
     RegNGFS.Free;
   end;

你测试一些方法,如WriteBool,ReadBool,ReadString,WriteString,...
此致