Quote:
Originally Posted by Carldric Clement
Use this...
Code:
procedure CurStepChanged(CurStep: TSetupStep);
var
URL: integer;
begin
if (CurStep=ssPostInstall) and not (ISDoneError) then
begin
ShellExec('open', 'http://your.app.url/', '', '', SW_SHOW, ewNoWait, URL);
end;
end;
|
i edit :
Code:
procedure CurStepChanged(CurStep: TSetupStep);
begin
CurStepChanged1(CurStep);
end;
replace with :
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;
succes open url but my game not instaled my game no data