games/vcmi
1
0
Fork 0
mirror of https://github.com/vcmi/vcmi.git synced 2026-06-19 22:57:37 +02:00
Code Issues Releases Activity

Copy H3 files only when checkbox is checked

Browse Source
This commit is contained in:
George King
2024-12-25 19:58:47 +01:00
committed by GitHub
parent d640e5d8fc
commit 92c07980e8
1 changed files with 30 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files
CI/wininstaller/installer.iss
+15 -1
View File
@@ -108,7 +108,7 @@ Name: "vietnamese"; MessagesFile: "{#LangPath}\Vietnamese.isl"
[Files]
Source: "{#SourceFilesPath}\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; BeforeInstall: PerformHeroes3FileCopy
Source: "{#SourceFilesPath}\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: IsHeroes3Installed; BeforeInstall: PerformHeroes3FileCopy
[Icons]
@@ -563,9 +563,19 @@ end;
procedure PerformHeroes3FileCopy();
var
i: Integer;
VCMIFilesFolder, VCMIMapsFolder, VCMIDataFolder, VCMIMp3Folder: String;
Heroes3MapsFolder, Heroes3DataFolder, Heroes3Mp3Folder: String;
begin
// Loop through all tasks to find the "h3copyfiles" task
for i := 0 to WizardForm.TasksList.Items.Count - 1 do
begin
// Check if the current task is "h3copyfiles"
if WizardForm.TasksList.Items[i] = ExpandConstant('{cm:CopyH3Files}') then
begin
// Check if the "h3copyfiles" task is checked
if WizardForm.TasksList.Checked[i] then
begin
// Define paths for VCMI and Heroes 3 directories
VCMIFilesFolder := GlobalUserDocsFolder + '\' + '{#VCMIFilesFolder}';
VCMIMapsFolder := VCMIFilesFolder + '\Maps';
@@ -585,6 +595,10 @@ begin
if (DirExists(Heroes3Mp3Folder) and ((not DirExists(VCMIMp3Folder)) or (FolderSize(VCMIMp3Folder) < 1024 * 1024))) then
CopyFolderContents(Heroes3Mp3Folder, VCMIMp3Folder, True);
end;
Exit; // Task found, exit the loop
end;
end;
end;