Martijn Laan před 4 měsíci
rodič
revize
c29e929667
1 změnil soubory, kde provedl 1 přidání a 0 odebrání
  1. 1 0
      Projects/Src/Compiler.SetupCompiler.pas

+ 1 - 0
Projects/Src/Compiler.SetupCompiler.pas

@@ -4841,6 +4841,7 @@ type
         if NewFileLocationEntry = nil then begin
           NewFileLocationEntry := AllocMem(SizeOf(TSetupFileLocationEntry));
           New(NewFileLocationEntryExtraInfo);
+          FillChar(NewFileLocationEntryExtraInfo^, SizeOf(TFileLocationEntryExtraInfo), 0);
           SetupHeader.CompressMethod := CompressMethod;
           FileLocationEntries.Add(NewFileLocationEntry);
           FileLocationEntryExtraInfos.Add(NewFileLocationEntryExtraInfo);