[Dodakaedr]

Предлагаю, так: »

А как больше веток добавить? Так не работает:

Код:

procedure IsRegExport();
var
    i: Integer;
    RegKey: String;
begin
    RegKey := 'HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.mp3';
    RegKey := 'HKEY_CLASSES_ROOT\.mp3';
    Exec( ExpandConstant( '{win}\regedit.exe' ), '-ea export.reg ' + AddQuotes( RegKey ), ExpandConstant( '{app}' ), SW_HIDE, ewWaitUntilTerminated, i );
end;

И то создал бекап ключа HKEY_CLASSES_ROOT\.mp3 а при удалении программы не восстанавливает.

С восстановлением разобрался, а как больше путей добавить без понятия.