File tree Expand file tree Collapse file tree 1 file changed +5
-7
lines changed
Expand file tree Collapse file tree 1 file changed +5
-7
lines changed Original file line number Diff line number Diff line change @@ -403,14 +403,12 @@ begin
403403end ;
404404
405405procedure InstallPython ();
406- var
407- ResultCode: Integer;
408- Shell := CreateOleObject(' Shell.Application' )
409- ZipFile := Shell.NameSpace(ExpandConstantEx(' {tmp}\{filename}' , ' filename' , PythonDep.Filename))
410- TargetFolder := Shell.NameSpace(ExpandConstant(' {app}\Python3' ))
411406begin
412- InstallDepPage.SetText(' Installing Python...' , ' ' )
413- TargetFolder.CopyHere(ZipFile.Items, SHCONTCH_NOPROGRESSBOX or SHCONTCH_RESPONDYESTOALL)
407+ InstallDepPage.SetText(' Installing Python...' , ' ' );
408+ Shell := CreateOleObject(' Shell.Application' );
409+ ZipFile := Shell.NameSpace(ExpandConstantEx(' {tmp}\{filename}' , ' filename' , PythonDep.Filename));
410+ TargetFolder := Shell.NameSpace(ExpandConstant(' {app}\Python3' ));
411+ TargetFolder.CopyHere(ZipFile.Items, SHCONTCH_NOPROGRESSBOX or SHCONTCH_RESPONDYESTOALL);
414412 CleanPython()
415413 InstallDepPage.SetProgress(InstallDepPage.ProgressBar.Position+1 , InstallDepPage.ProgressBar.Max)
416414end ;
You can’t perform that action at this time.
0 commit comments