Thread: **New Installer
View Single Post
  #76  
Old 21-11-2015, 04:38
JRD!'s Avatar
JRD! JRD! is offline
Registered User
 
Join Date: Sep 2015
Location: Matrix
Posts: 274
Thanks: 225
Thanked 600 Times in 168 Posts
JRD! is on a distinguished road
Juste modify CurStepChanged section on UltraArc module:

Code:
procedure CurStepChanged(CurStep: TSetupStep);
begin
   if (CurStep = ssInstall) and FileExists(ExpandConstant('{src}\records.ini')) then
     UltraARC_Process;

//   if (CurStep=ssPostInstall) and ISDoneError then begin
//      MemoIsdoneList.clear;
//       MemoExecute:='Scanning files...' + #13#10 +
//       'Rolling back changes...' + #13#10 +
//        'Error!';
//          MemoIsdoneList.Lines.Add(MemoExecute);
//         UnBtn.Enabled:=False;
//        Exec2(ExpandConstant('{uninstallexe}'), '/VERYSILENT', false);
//      DelTree(ExpandConstant('{app}'), True, True, True);
//   end;

end;
That answer your question?

Last edited by JRD!; 21-11-2015 at 04:45.
Reply With Quote
Sponsored Links