[Dodakaedr]

но в реестре, в конце пути стоит символ {;} как его удалить? »

а еще лутше так C:\Program Files (x86)\Internet Explorer тоисть удалить все что идет посте последнего \ »

используйте функции Copy и ExtractFilePath

Код:

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[code]
procedure InitializeWizard();
var
  s: string;
begin
  s := 'Path=C:\Program Files (x86)\Internet Explorer\IEXPLORE.EXE;';
  s := Copy(s, 0, Length(s)-1);
  s := RemoveBackslash(ExtractFilePath(s));
  MsgBox(s, mbInformation, MB_OK);
end;

[Gnom_aka_Lexander]

Beavimo, самое простое, использовать в такой ситуации функцию

Код:

ExtractFilePath(const FileName: string):string

Она отсекает с хвоста все до первого слеша.

Код:

ExtractFilePath(ExpandConstant('{reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE,Path}'));

даст на выходе C:\Program Files (x86)\Internet Explorer\
Если нужно без косой черты, то ExtractFileDir - она возвращает тоже самое, но без слеша

[Beavimo]

наконец то......... целую ночь провозился, с этой кажись - такой мелочью.

CODE

Код:

[Setup]
AppName=TEST1 
AppVerName=TEST2 
OutputDir=userdocs:..\desktop
CreateAppDir=no
Uninstallable=no

[*Code]
function InitializeSetup(): Boolean; var 
    FileName: String;  
  begin
    FileName:=ExtractFilePath(ExpandConstant('{reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE,Path}'));
      if not FileExists((FileName)+('Internet Explorer\iexplore.exe')) then
    Result:=True
  else
    MsgBox((FileName)+'Internet Explorer' #13''#13 'Папка  Установки  При  Обновлении !', mbInformation, MB_OK);
end;

[Files]
//Source: "userdocs:..\desktop\TEST.exe"; DestDir: "{app}"; Flags: ignoreversion

Теперь другов вопрос, как его этот путь "(FileName)+'Internet Explorer'", сохранить в например в дириктиву #define, или например в {app} неважно куда и как важно чтобы в (DestDir) каталог установки брался автоматом, так как пишеться апдейт а не полноценный софт.

[nik1967]

Beavimo,

Код:

DefaultDirName={code:ExtractFilePath|{reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE,|}}

[VLADEV]

Привет. что я делаю не так? Помогите новичку. Винда 10-64

Код:

Root: HKLM; SubKey: SOFTWARE\Boris FX, Inc.\Boris Graffiti 6.6; ValueType: string; ValueName: DefaultLibraryPath; ValueData: {pf64}\Boris FX, Inc\Keyframe Libraries 6; Flags: uninsdeletevalue uninsdeletekeyifempty

а прописывается в
HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\WOW6432Node

Спасибо.

[habib2302]

VLADEV, Замените HKLM на HKLM64

[VLADEV]

habib2302,

Спасибо я конечно это сделал. я использовал конвертер реестра Converter.exe
и он не проставляет мне HKLM64 Вот я и не понял почему .

[iglezz]

и он не проставляет мне HKLM64 Вот я и не понял почему . »

А откуда ему знать, какая разрядность у целевой системы и программы, которой эти ветки реестра предназначаются?

Там, где предполагается несовпадение разрядности программы и системы, пути в реестре и на диске надо самому проверять.

[Nordek]

а прописывается в HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\WOW6432Node »

Меня всегда интересовал вопрос о тех, кто задаёт похожие или одни и теже вопросы: Есть ли у людей логика, или всё-таки как класс она отсутствует?
1. Справка (Пожалуй это самое важное правило.).
2. Поиск (Это самое важное правило после первого пункта).

Далее:
Совсем недавно было: Сообщение #487.

Далее:

я использовал конвертер реестра Converter.exe »

Действительно ли вам Converter так необходим?
Читайте сообщение #530 о Inno Script Studio.

Работа с Inno Script Studio:

Вам нужно импортировать данные реестра.

Экспортируете необходимый подраздел реестра из RegEdit сохранив в файл *.reg.

Открываете Inno Script Studio, или скрипт в нём.

Переводите фокус на Registry и щёлкаете по нему левой кнопкой мыши.
Вы в секции Registry:


Далее щёлкаете левой кнопкой мыши по подготовленному файлу *.reg и не отпуская кнопки перетаскиваете в область Registry:


Замечательно, данные импортировались:

---

Вам нужно изменить список строк.

Делаете как я (Делаю везде где только вздумается, не только в Inno):

Выделяете необходимые данные для копирования:

Нажимаете комбинацию клавиш CTRL+C чтоб скопировать выделенное.

Переводите фокус к началу первой строки:


Нажимаете комбинацию клавиш CTRL+H чтоб начать работу с заменой текста.

В первом поле вставляете (CTRL+V) скопированный текст, который будет заменён:


Во втором вводите данные для замены:


Щёлкаете клавишу Replace All чтоб заменить все заданные условия:


затем подтверждаете щёлкнув клавишу All:


Как видите необходимые данные были заменены:

Эти данные в 64-разрядной ОС будут внесены в WOW6432Node.

---

Для x64 аналогично.

Выделяете необходимые данные для копирования:

Нажимаете комбинацию клавиш CTRL+C чтоб скопировать выделенное.

Переводите фокус не к началу как ранее, а куда-нибудь в коментарии:


Нажимаете комбинацию клавиш CTRL+H чтоб начать работу с заменой текста.

В первом поле вставляете (CTRL+V) скопированный текст, который будет заменён:


Во втором вводите данные для замены:


Щёлкаете клавишу Replace All чтоб заменить все заданные условия:


затем подтверждаете щёлкнув клавишу All:


Как видите и в этом случае необходимые данные были заменены:


Всё, теперь вы умеете импортировать *.reg и заменять некорректные данные на необходимые!
Хочу заметить: Всё в одной программе.

[VLADEV]

Nordek, Низкий поклон. Голова пока кипит ))) Взял на вооружение. Никаких конвертеров теперь