Delphi操作注册表的一般步骤

Delphi操作注册表步骤如下：
-------------------------------------
1）在Uses中添加Registry单元；
2）声明TRegistry对象；
3）创建TRegistry对象；
4）指定根键；
----------------try------------------
5）打开需要操作的主键；
6）读写操作；
7）保存并关闭主键；
--------------finally----------------
8）释放TRegistry对象；
---------------end------------------

==========================================================
Uses Registry;    //添加Registry单元；

var
    MyReg: TRegistry;    //声明TRegistry对象；
begin
    MyReg := TRegistry.Create;   //创建TRegistry对象；
    try
        MyReg.RootKey := HKEY_LOCAL_MACHINE; //指定根键；
        if MyReg.OpenKey('主键名', true) then  //打开需要操作的主键；
        begin
            MyReg.ReadType(---);   //读注册表文件
            MyReg.WriteType(---);   //写注册表文件
        end;
        MyReg.CloseKey;   //保存并关闭主键；
    finally
        MyReg.Free;    //释放TRegistry对象；
    end;
end;
==========================================================

function OpenKey(const Key:String; CanCreate:Boolean):Boolean;
//第二个参数指明，如果需要打开的主键不存在时是否创建该主键

function CreateKey(const Key:String):Boolean;
//此方法用于创建主键，实际上并不常用

function KeyExists(const Key:String):Boolean;
//判断主键是否存在

(***对于字符串类型的操作函数***)
function ReadString(const Name: String):String;
procedure WriteString(const Name, Value: String);
//对于其它数据类型的注册表读写操作与上雷同

==========================================================

//[eg:]//

var
    Reg:TRegistry;
begin
    Reg := TRegistry.Create;
    try
        Reg.RootKey := HKEY_CURRENT_USER;
        if Reg.OpenKey('/Software/Microsoft/Windows/CurrentVersion/Run',True)
        then  begin
            Reg.WriteString('MyApp', ParamStr(0));
            Reg.CloseKey;
        end;
    finally
        Reg.Free;
    end;
end;

==========================================================