2017-05-05 83 views
2

我需要创建一个安装程序包,以允许将同一应用程序的多个实例安装在同一台PC /服务器上。所以,我希望在处理UserInfo页面后动态修改默认的“安装到”位置。如何更改Inno Setup中用户信息页面后的默认目标目录({app})

即在NextButtonClick事件中,我希望在时更改SelectDir向导页上的值。像下面这样(引发异常)。我还假设我可以通过扩展{userinfoname}来访问用户名。任何帮助,将不胜感激。

function NextButtonClick(CurPageID: Integer): Boolean; 
var 
    Page: TInputDirWizardPage; 
begin 
    case CurPageID of 
    ........ 
    wpUserInfo: 
     begin 
     Page := TInputDirWizardPage(PageFromID(wpSelectDir)); 
     Page.Values[0] := MyAppDirFunction; 
     end; 
    end; 
    Result := True; 
end; 

回答

3

要访问 “目标文件夹” 框中,使用WizardForm.DirEdit

WizardForm.DirEdit.Text := Path; 

TWizardForm reference

+1

非常感谢。 – TomB