关于“TRegistry”的使用

Question

我现在需要做一个关于本程序的参数配置窗体，即：培植此程序的服务器、数据库、用户名、密码等信息， 各位能否给提供个例子， 说明如何建立？
谢谢！

Answer 1

try
    Reg:=TRegistry.create;
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if reg.KeyExists('Software\database') then
    begin
      if Reg.OpenKey('\Software\database', True) then
      begin
       edit1.Text:=reg.ReadString('username');
       Reg.CloseKey;
      end;
    end else
    begin
      reg.CreateKey('Software\database');
    end;
  finally
   freeandnil(reg);
 end;

Answer 2

上面的例子已经很详细了，但是把密码和用户写到注册表里面不是很安全，所以我建议写入.dll里面或者加密以后写道注册表里面。

Answer 3

try
    Reg:=TRegistry.create;
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if Reg.OpenKey('\Software\database', True) then
    begin
     if reg.valueexists('username') then
       edit1.Text:=reg.ReadString('username')
     else edit1.text := '';
     Reg.CloseKey;
    end;
  finally
   freeandnil(reg);
 end;这样是否会好一些，因为openkey本来就会自动建立的