//判断注册表是否存在,不存在就创建
result = Registry.DoesKeyExist(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp");
if (result) then
else
-- 要执行的 else 语句
Registry.CreateKey(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp")
Registry.SetValue(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp", "Description", "软件描述", REG_SZ);
Registry.SetValue(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp", "Path", SessionVar.Get("%AppFolder%").."\\App1.exe", REG_SZ);
Registry.SetValue(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp", "ProductName", "软件名称", REG_SZ);
Registry.SetValue(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp", "Vendor", "testtek.inc", REG_SZ);
Registry.SetValue(HKEY_CURRENT_USER, "SOFTWARE\\MyTestApp", "Version", "1.0.0.0", REG_SZ);