[архив] Inno Setup .:[все вопросы]:.

[serg aka lain]

а у тебя работоет? я имею в виду с путём назначения всё в порядке! значит уменя какойто глюк?

[evgenik123456]

Цитата evgenik123456:



а у тебя работоет? я имею в виду с путём назначения всё в порядке!

[архив] Inno Setup .:[все вопросы]:.

именно этот код - работает.

[evgenik123456]

может с ino setup проблемы

[evgenik123456]

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}

[BlackSelf]

evgenik123456, чуть-чуть изменил вариант serg aka lain. Попробуйте:

читать дальше »

Код:

Код: Выделить всё

[Setup]
AppName=Spore
AppVerName=Spore
DefaultDirName={code:GetInstallDataDir}
AppendDefaultDirName=False
ShowLanguageDialog=auto
OutputDir=.
[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 := RemoveQuotes(InstallDataDir)
  else
    Result := AddBackSlash(ExpandConstant('{pf}\Spore'));
end;

[serg aka lain]

BlackSelf,

Так RemoveQuotes(); нужна чтобы кавычки в пути (значении ключа убрать),

обычно их в этой ветке не замечал, но в принципе пускай будет

Result := RemoveQuotes(InstallDataDir), не помешает.

[serg aka lain]

serg aka lain, просто мне кажется, что подобная проблема:

C:\Program Files (x86)\Inno Setup 5\Examples\Output\"f:\Program Files (x86)\Electronic Arts\SPORE\Data\"

получается из-за того, что путь в реестре заключен в кавычки.

[BlackSelf]

BlackSelf, возможно, но по умолчанию не видел, чтобы с кавычками было,

как уже и говорил Result := RemoveQuotes(InstallDataDir), не помешает.

[Serega]

Цитата evgenik123456:



может с ino setup проблемы

[архив] Inno Setup .:[все вопросы]:.

Нет.

Экспортируйте свой ключ в рег файл и покажите его.




Цитата serg aka lain:



но по умолчанию не видел, чтобы с кавычками было,

[архив] Inno Setup .:[все вопросы]:.

serg aka lain, дело в том, что инсталляторы делают люди, ну а в коком виде его туда занесут в таком и будет ...

Мне попадались такие, но если экспортировать ключ в рег файл, то строковой параметр обязательно будет в кавычках.

[volk1234]

Лимит страниц.

Тема закрыта.

продолжаем тут:

Inno Setup. Прочие вопросы

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]