瀏覽代碼

Add comment.

Martijn Laan 3 月之前
父節點
當前提交
b4fa687cee
共有 1 個文件被更改,包括 3 次插入0 次删除
  1. 3 0
      Projects/Src/Setup.Install.pas

+ 3 - 0
Projects/Src/Setup.Install.pas

@@ -960,6 +960,9 @@ var
     const FileLocationFilenames: TStringList; const AExternalSize: Integer64;
     var ConfirmOverwriteOverwriteAll, PromptIfOlderOverwriteAll: TOverwriteAll;
     var WarnedPerUserFonts: Boolean);
+  { Not external: AExternalSourceFile and ADestFile should be empty strings,
+                  FileLocationFilenames should be set, AExternalSize is unused
+    Extern      : Opposite }
 
     procedure InstallFont(const Filename, FontName: String;
       const PerUserFont, AddToFontTableNow: Boolean; var WarnedPerUserFonts: Boolean);