Загрузка куста реестра - LoadKey

    TRegistry *reg=new TRegistry(KEY_ALL_ACCESS);
   reg->RootKey=HKEY_LOCAL_MACHINE;
   int i=reg->LoadKey("mycust","C:\\11"); //Загрузка
   ShowMessage(i); //возвращает 0

// ---------------------------------------------------------------------------
#include <memory>
#include <Registry.hpp>
 
namespace Regutils {
 
    // экспорт ветки реестра с подавлением запроса на перезапись
    // генерирует исключение, если не найден ключ в реестре,
    // не может запустить программу "REG" или, если она возвратила ошибку
 
    // пример: допустим необходимо экспортировать [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\Winsock]
    // в файл [g:\\Test\\test.reg]
    // листинг: Regutils::ExportKey("SYSTEM\\CurrentControlSet\\services\\Winsock", "g:\\Test\\test.reg", HKEY_LOCAL_MACHINE);
 
    void ExportKey(const UnicodeString & sRegistryPath, const UnicodeString &sFileName, HKEY hRootKey = HKEY_CURRENT_USER) {
 
        UnicodeString /* out */ sRootKey = "HKCU";
 
        switch((int)hRootKey) {
        case HKEY_LOCAL_MACHINE: {
                sRootKey = "HKLM";
            }break;
        case HKEY_CLASSES_ROOT: {
                sRootKey = "HKCR";
            }break;
        case HKEY_USERS: {
                sRootKey = "HKU";
            }break;
        case HKEY_CURRENT_CONFIG: {
                sRootKey = "HKCC";
            }break;
        }
 
        std::auto_ptr<TRegistry>ARegistry(new TRegistry(KEY_ALL_ACCESS));
        // ----корневым каталогом будет hRootKey, который по умолчанию HKEY_CURRENT_USER
        ARegistry->RootKey = hRootKey;
        // ----если ключ существует
        if (ARegistry->KeyExists(sRegistryPath)) {
 
            const UnicodeString sQuotedRegPath = AnsiQuotedStr(IncludeTrailingBackslash(sRootKey) + sRegistryPath, L'"');
            const UnicodeString sQuotedFileName = AnsiQuotedStr(sFileName, L'"');
            const UnicodeString sCmdLine = "reg export " + sQuotedRegPath + " " + sQuotedFileName + " /y";
 
            STARTUPINFOW si;
            PROCESS_INFORMATION pi;
 
            ZeroMemory(&si, sizeof(si));
            si.cb = sizeof(si);
            si.wShowWindow = SW_HIDE;
            si.dwFlags = STARTF_USESHOWWINDOW;
            ZeroMemory(&pi, sizeof(pi));
 
            // Start the child process.
            if (!CreateProcessW(NULL, sCmdLine.c_str(), NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi)) {
                throw Exception("ERROR> CreateProcess failed with message <" + SysErrorMessage(GetLastError()) + ">");
 
            }
 
            // Wait until child process exits.
            WaitForSingleObject(pi.hProcess, INFINITE);
 
            ULONG uExitCode;
            GetExitCodeProcess(pi.hProcess, &uExitCode);
 
            // Close process and thread handles.
            CloseHandle(pi.hProcess);
            CloseHandle(pi.hThread);
 
            if (uExitCode)
                throw Exception("ERROR> Failed to execute <" + sCmdLine + ">");
        }
        else {
            throw Exception("ERROR> Key path <" + sRegistryPath + "> does not exist in root <" + sRootKey + ">");
        }
    }
 
    // импортирует ветку реестра из указанного файла в формате [Windows Registry Editor]
    void ImportKey(const UnicodeString &sFileName) {
 
        const UnicodeString sQuotedFileName = AnsiQuotedStr(sFileName, L'"');
        const UnicodeString sCmdLine = "reg import " + sQuotedFileName;
 
        STARTUPINFOW si;
        PROCESS_INFORMATION pi;
 
        ZeroMemory(&si, sizeof(si));
        si.cb = sizeof(si);
        si.wShowWindow = SW_HIDE;
        si.dwFlags = STARTF_USESHOWWINDOW;
        ZeroMemory(&pi, sizeof(pi));
 
        // Start the child process.
        if (!CreateProcessW(NULL, sCmdLine.c_str(), NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi)) {
            throw Exception("ERROR> CreateProcess failed with message <" + SysErrorMessage(GetLastError()) + ">");
 
        }
 
        // Wait until child process exits.
        WaitForSingleObject(pi.hProcess, INFINITE);
 
        ULONG uExitCode;
        GetExitCodeProcess(pi.hProcess, &uExitCode);
 
        // Close process and thread handles.
        CloseHandle(pi.hProcess);
        CloseHandle(pi.hThread);
 
        if (uExitCode)
            throw Exception("ERROR> Failed to execute <" + sCmdLine + ">");
 
    }
};

// ---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender) {
    // пример экспорта
    try {
        Regutils::ExportKey("SYSTEM\\CurrentControlSet\\services\\Winsock", "g:\\Test\\test.reg", HKEY_LOCAL_MACHINE);
    }
    catch(Exception * E) {
        ShowMessage(E->Message);
    }
 
    // пример импорта
    try {
        Regutils::ImportKey("g:\\Test\\test.reg");
    }
    catch(Exception * E) {
        ShowMessage(E->Message);
    }
}
// ---------------------------------------------------------------------------