mirror
/
OpenDroneMap-ODM
kopia lustrzana https://github.com/OpenDroneMap/ODM
1
0
Forkuj 0
Kod Zgłoszenia Projekty Wydania Wiki Aktywność

Merged Python38 folder with venv\Scripts

pull/1627/head
Luca Di Leo 2023-03-29 19:05:21 +02:00
rodzic 3942755b10
commit d013539275
1 zmienionych plików z 1 dodań i 65 usunięć
Pokaż statystyki Ściągnij plik aktualizacji Ściągnij plik porównania Expand all files Collapse all files

66
innosetup.iss
Wyświetl plik

@ -47,7 +47,7 @@ Source: "stages\*"; DestDir: "{app}\stages"; Excludes: "__pycache__"; Flags: ign
Source: "SuperBuild\install\bin\*"; DestDir: "{app}\SuperBuild\install\bin"; Excludes: "__pycache__"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "SuperBuild\install\lib\python3.8\*"; DestDir: "{app}\SuperBuild\install\lib\python3.8"; Excludes: "__pycache__"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "venv\*"; DestDir: "{app}\venv"; Excludes: "__pycache__,pyvenv.cfg"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "python38\*"; DestDir: "{app}\python38"; Excludes: "__pycache__"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "python38\*"; DestDir: "{app}\venv\Scripts"; Excludes: "__pycache__"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "console.bat"; DestDir: "{app}"; Flags: ignoreversion
Source: "VERSION"; DestDir: "{app}"; Flags: ignoreversion
Source: "LICENSE"; DestDir: "{app}"; Flags: ignoreversion
@ -71,70 +71,6 @@ Filename: "{app}\console.bat"; Description: {cm:LaunchProgram,ODM Console}; Flag
[Code]
function GetShortPath(const LongPath: string): string;
var
ResultCode: Integer;
TmpFileName: string;
ExecStdout: AnsiString;
Parameters: string;
begin
// Create LongPath folder
if not ForceDirectories(LongPath) then begin
Result := LongPath;
Exit;
end;
TmpFileName := ExpandConstant('{tmp}') + '\short_result.txt';
Parameters := '-Command "(New-Object -ComObject Scripting.FileSystemObject).GetFolder(''' + LongPath + ''').ShortPath | Out-File -FilePath ''' + TmpFileName + ''' -Encoding ASCII"';
// Execute the PowerShell command and save the output to the TmpFileName
if Exec('powershell.exe', Parameters, '', 0, ewWaitUntilTerminated, ResultCode) then
begin
// Read the output from the TmpFileName
if LoadStringFromFile(TmpFileName, ExecStdout) then begin
Result := Trim(ExecStdout);
end
else begin
Result := LongPath;
end;
DeleteFile(TmpFileName);
// Delete the folder
if not RemoveDir(LongPath) then begin
Result := LongPath;
Exit;
end;
end
else
begin
Result := LongPath;
end;
end;
function NextButtonClick(CurPageID: Integer): Boolean;
var
Dir: string;
begin
if CurPageID = wpSelectDir then
begin
// Get the selected directory
Dir := WizardForm.DirEdit.Text;
// Check if the path contains spaces
if Pos(' ', Dir) > 0 then
begin
// Get the short path name
Dir := GetShortPath(Dir);
// Set the selected directory to the short path name
WizardForm.DirEdit.Text := Dir;
end;
end;
Result := True;
end;
function VC2019RedistNeedsInstall: Boolean;
var
Version: String;