evgenik123456,
Можно ещё и так
Код:
; Inno Setup Compiler 5.3.4(u)
[Setup]
AppName=Spore
AppVerName=Spore
DefaultDirName={code:GetInstallDataDir}
AppendDefaultDirName=False
ShowLanguageDialog=auto
OutputDir=userdocs:Spore.
[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl";
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl";
[code]
function GetInstallDataDir(InstallDataDir: String): String;
begin
RegQueryStringValue(HKLM, 'Software\Electronic Arts\SPORE', 'DataDir', InstallDataDir);
if InstallDataDir <> '' then
Result := InstallDataDir
else
Result := AddBackSlash(ExpandConstant('{pf}\Spore'));
end;
Что есть тоже самое, что и
Код:
DefaultDirName={reg:HKLM\Software\Electronic Arts\SPORE,DataDir|{pf}\My Program}