ValueExists(ValueName: String): Boolean;
ValueName - наименование параметра, наличие которого необходимо проверить.
Метод ValueExists осуществляет проверку наличия параметра в подразделе реестра.
Sub Main;
Var
RegKey, SubKey: IRegistryKey;
Begin
RegKey := RegistryClass.CurrentUser;
SubKey := RegKey.OpenSubKey("Software\MyProject\Params", True);
If SubKey.ValueExists("Param1") Then
SubKey.DeleteValue("Param1")
End If;
End Sub Main;
После выполнения примера, в подразделе реестра "HKEY_CURRENT_USER\Software\MyProject\Params" будет осуществлен поиск параметра "Param1". Если параметр существует, то он будет удален.
См.также: