View Single Post
  #1  
Old 04-05-2016, 20:38
Carldric Clement's Avatar
Carldric Clement Carldric Clement is offline
Registered User
 
Join Date: Aug 2014
Location: Toboh, Sabah, Malaysia
Posts: 596
Thanks: 599
Thanked 659 Times in 234 Posts
Carldric Clement is on a distinguished road
Quote:
Originally Posted by inatha3 View Post
How to Open URL after finish instalation and how to roll back install if corupt or eror ? thanks
Use This:
Code:
procedure CurStepChanged(CurStep: TSetupStep);
var
    URL: integer;
begin
  if (CurStep = ssPostInstall) and ISDoneError then
  begin
    Exec2(ExpandConstant('{uninstallexe}'), '/VERYSILENT', false);
  end;
    if (CurStep=ssPostInstall) and not (ISDoneError) then
    begin
        ShellExec('open', 'http://your.app.url/', '', '', SW_SHOW, ewNoWait, URL);
    end;
end;
Reply With Quote
Sponsored Links