Тестирование

[Shift85]

да,он самый

Там вроде как баг какой то или я ошибаюсь...

 

[sergey3695]

Shift85, да я читал сообщение Snoopak96 (но я не понял в чем баг )

 

[Shift85]

да я читал сообщение Snoopak96 (но я не понял в чем баг

Аналогично

 

[sergey3695]

Silentman, а где у тебя стим стоит?
хм... а если так

 

[Silentman]

sergey3695, стим у меня стоит C:\Program Files\Steam. Теперь у меня так: http://rghost.ru/52767237 (при нажатии "далее" выскакивает ошибка)

 

[sergey3695]

Silentman, можешь скрин сообщения сделать

 

[urban]

Silentman, у тебя вроде пробел в пути есть

 

[sergey3695]

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

 

[Silentman]

sergey3695, вот скрин: http://rghost.ru/52768044

 

[Winst@n]

sergey3695,
Серега ты каким ключом проверяешь установку стима?

 

[sergey3695]

Silentman, Setup,Cr_Install. Если все ок,просто напиши ок,если нет то можно скин сообщения и пути. Заранее спасибо.
Winst@n,

ExpandConstant('{reg:HKLM\SOFTWARE\Valve\Steam,InstallPath}')

 

[Silentman]

sergey3695, теперь у меня всё работает

 

[Winst@n]

sergey3695,

procedure SteamSetupWin;
begin
RegQueryStringValue(HKLM, 'Software\Valve\Steam' , 'InstallPath', DirFolder)
WizardForm.DirEdit.Text := ExpandConstant(DirFolder + '\steamapps\common\{#SteamNameGame}')
WizardForm.DirEdit.Enabled:=false
WizardForm.DirBrowseButton.Enabled:=false
end;

 

[sergey3695]

Winst@n, у меня также,только я еще сохраняю путь при смене на steam версию.
Только путь при смене такой

  WizardForm.DirEdit.Text:= ExpandConstant('{reg:HKLM\SOFTWARE\Valve\Steam,InstallPath|{pf}\Steam}')+ '\steamapps\common\{#DirSteam}';

 

[Winst@n]

sergey3695,
Не меняя путь в эдите он все равно будет показываться из секции сетап, по умолчанию.
Ну у меня еще ярлык привязан к выбору и т .д

 

[sergey3695]

Winst@n, а у тебя ярлык при стим версии создает на раб. столе url ссылку? (у меня да)

 

[Winst@n]

sergey3695,
Да, именно... для этого написал мне один друг библу, ну в ней еще мелочи всякие. А так делал ярлык с помощью пример из FAQ для создания динамичного батника.

 

[sergey3695]

Winst@n, батник? библа? Зачем?
А так не прет?

  SaveStringToFile(ExpandConstant('{userdesktop}\{#NameRusSD}.url'), '', True);
  SetIniString('InternetShortcut','URL','{#UrlSteam}',ExpandConstant('{userdesktop}\{#NameRusSD}.url'));
  SetIniString('InternetShortcut','IconFile',ExpandConstant('{reg:HKLM\SOFTWARE\Valve\Steam,InstallPath}\steam\games\fc0e6be63050c9e35ff5e7d257e99cc299fed997.ico'),ExpandConstant('{userdesktop}\{#NameRusSD}.url'));
  SetIniString('InternetShortcut','IconIndex','0',ExpandConstant('{userdesktop}\{#NameRusSD}.url'));

 

[Winst@n]

sergey3695,
Как вариант можно так делать, в библу просто включили это как допа.. там есть свои фишки..

 

[Shift85]

Протестируйте пожалуйста инсталлятор...
1-Интересует вопрос о заполнении прогресс бара блоками...
2-Установка Доп ПО...
1-P.S-Тестить желательно на Win 8 и 8.1...
2-P.S-EvilAlex, Какой использовался цвет здесь -http://rghost.ru/53666105
3-P.S-Может добавить или удалить чего х.з и т.д...

http://rghost.ru/53666079