View Single Post
  #24  
Old 28-10-2017, 11:31
danswano danswano is offline
Registered User
 
Join Date: Feb 2013
Location: Luxm
Posts: 314
Thanks: 218
Thanked 27 Times in 22 Posts
danswano is on a distinguished road
Question

Thanks razor, any idea or tip about the other problem?
Another problem:
how to extract another single arc archive after the split extraction is done? the installer is just skipping it and finish.
Code:
    begin
      WizardForm.ProgressGauge.Position := 0;
      Wizardform.ProgressGauge.Max := 1000;
      ClsSourcePath(ExpandConstant('{src}'));
      ClsDiskRequest(@MyDiskRequest);
      if not ISArcExtract(0, 90, ExpandConstant('{src}\data.bin.001'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), false) then
      if not ISArcExtract(0, 10, ExpandConstant('{src}\singlearchive.arc'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), false) then
        ISDoneError := True;
    end;
    ISDoneStop;
  end;
  if ISDoneError = True then
    WizardForm.CancelButton.OnClick(nil);
end;;
Note: i can extract each file alone but not together using the same above code for each.[/QUOTE]
Reply With Quote