Inno Setup - определение пути по умолчанию внутри [code]

Question

Я пытаюсь прочитать реестр Windows, чтобы обновления моего приложения могли восстановить ранее сохраненный путь установки в качестве его DefaultDirName.

Я где-то читал, что я должен вызвать функцию, например:

DefaultDirName="{code:GetPath}" 

Проблема заключается в том, что мне нужно, чтобы определить путь по умолчанию, в случае, если функция не находит предыдущую. Например, «C: \ MyPath». Поэтому я сделал это:

[Code] 
function GetPath(Value: String): String; 
var 
    OrigPath: string; 
begin 
    Result := '{sd}\MyPath'; 
    if RegQueryStringValue(HKCU, 'Software\MyApp', 'PathExec', OrigPath) then 
    Result := OrigPath; 
end; 

Это не работает. Когда я запускаю настройку, в диалоговом окне адресата назначения я получаю буквально «C: \ PathOfMySetup \ {sd} \ MyPath», а не «C: \ MyPath».

Что следует писать на этой первой строке «Результат: =», чтобы «MyPath» был создан на системном диске?

Спасибо.

Answer 1

Константы в Pascal Script не магически расширены. Вы должны расширить их явно с помощью ExpandConstant function:

Result := ExpandConstant('{sd}\MyPath');