Quote:
Originally Posted by inatha3
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;