Inno Setup [Run]段打开网页

Share

1. Run]
   
2. Filename: "{code:f_strUrl}"; Parameters: "/q /norestart"; WorkingDir: {app}; Flags:postinstall shellexec skipifsilent; Description:"Open 网站 {code:f_strUrl}";
   
3. 
   
4. 在Code段中，添加f_strUrl的实现
   
5. [Code]
   
6. var m_WebPort:integer;
   
7. function f_strUrl(SubDir:String):String;
   
8. var
   
9.   ErrorCode: Integer;
   
10. begin
    
11. Result:='http://127.0.0.1:'+IntToStr(m_WebPort)+'/网站登录界面';
    
12. end;

复制代码