Hola , Alguien puede ayudarme a convertir este código escrito con C# a Delphi
?
Código:
public void SetCurrentEffectPreset(int value)
{
WindowsIdentity identity = WindowsIdentity.GetCurrent();
string path = string.Format("{0}\\Software\\Microsoft\\MediaPlayer\\Preferences", identity.User.Value);
RegistryKey key = Registry.Users.OpenSubKey(path, true);
if (key == null)
throw new Exception("Error! Registry not found!");
key.SetValue("CurrentEffectPreset", value, RegistryValueKind.DWord);
ReinitializeAxWindowsMediaPlayer();
}
Muchas gracias .