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);
//对于其它数据类型的注册表读写
毕竟Win32程序的开发，Delphi还是有顽强的生命力的。
操作步骤如下：
1.建立 res 文件
建立一个文本文件，名字可以自己起，我这里叫：UAC.manifest，内容：
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
......
