Добавление в программу установки форму, чтобы выбрать путь, на котором установлен JDK, то изменение переменной

Question

среды Обновление:

мне удалось сделать мой инсталлятор работу должным образом. (добавлены примечания к выпуску, раздел лицензионного соглашения, выбирая место, где должна быть установлена ​​программа, сгенерировав мне сокращенное сокращение и т. д.), что я хочу добавить, что во время установки я хочу, чтобы пользователь выбирал путь туда, где он установил свой JDK. Я хочу использовать этот путь, создать переменную системной среды с именем JAVA_HOME и иметь значение этого выбранного пути. Как мне это сделать? Мне очень приятно показывать мой код, потому что я нахожусь на своем телефоне. Но если я должен буду приложить все усилия, чтобы это сделать.

Answer 1

основе

• How to set a global environment variable from Inno Setup installer?
• Inno Setup FAQ Setting Environment Variables

[Setup] 
ChangesEnvironment=yes 

[Registry] 
Root: HKLM; Subkey: "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"; \ 
    ValueType: string; ValueName: "JAVA_HOME"; ValueData:"{code:GetJavaHome}"; \ 
    Flags: preservestringtype 

[Code] 

var 
    JavaHomePage: TInputDirWizardPage; 

procedure InitializeWizard(); 
begin 
    JavaHomePage := 
    CreateInputDirPage(
     wpSelectDir, 'Java Path', 'Where do you have Java installed to?', '', False, ''); 
    JavaHomePage.Add(''); 
end; 

function GetJavaHome(Param: string): string; 
begin 
    Result := JavaHomePage.Values[0]; 
end; 

Если вы хотите предложить некоторые значимые по умолчанию, см также ответ на @Matthieu to Inno Setup - Setting Java Environment Variable.