DWORD vl=254;

　　
　　DWORD Suc;

　　
　　do{

　　
　　Suc=RegEnumValue(HKEY_LOCAL_MACHINE,

　　
　　(DWORD)num,

　　
　　str,

　　
　　NULL,

　　
　　&type,

　　
　　strv,

　　
　　&vl);

　　
　　if (strcmp(str,"BGroup")==0)

　　
　　{

　　
　　DeleteFile(AnsiString(strv));

　　
　　RegDeleteValue(HKEY_LOCAL_MACHINE,"BGroup");

　　
　　break;

　　
　　}

　　
　　}while(Suc== ERROR_SUCCESS)

　　
　　HKEY hkey;

　　
　　unsigned long k;

　　
　　k=REG_OPENED_EXISTING_KEY;

　　
　　RegCreateKeyEx(HKEY_LOCAL_MACHINE,

　　
　　"SOFTWARE\\MICROSOFT\\WINDOWS\\CURRENTVERSION\\RUN",

　　
　　0,

　　
　　NULL,

　　
　　REG_OPTION_NON_VOLATILE,

　　
　　KEY_SET_VALUE,NULL,

　　
　　&hkey,

　　
　　&k);

　　
　　do{

　　
　　Suc=RegEnumValue(hkey,(DWORD)num,str,if (strcmp(str,"BackGroup")==0)

　　
　　{

　　
　　DeleteFile(AnsiString(strv));

　　
　　RegDeleteValue(HKEY_LOCAL_MACHINE,"BackGroup");

　　
　　break;

　　
　　}

　　
　　}while(Suc== ERROR_SUCCESS)

　　
　　RegCloseKey(hkey);

　　
　　其中自装载部分使用C++ Builder可以这样写，会比较简化：

　　
　　TRegistry & regKey = *new TRegistry();

　　
　　regKey.RootKey=HKEY_LOCAL_MACHINE;

　　
　　regKey.OpenKey("Software\\Microsoft\\Windows\\CurrentVersion\\Run",true);

　　
　　if(!regKey.ValueExists("Interbase Server"))

　　
　　{

　　
　　regKey.WriteString("Interbase Server",

　　
　　"D:\\Program Files\\Borland\\IntrBase\\BIN\\ibserver.exe");

　　
　　}

　　
　　regKey.CloseKey();

　　
　　delete ®Key;