2
0
Эх сурвалжийг харах

Dont show files which dont have a memo because MaxMemos was reached.

Martijn Laan 14 цаг өмнө
parent
commit
eacff82fa4

+ 2 - 1
Projects/Src/IDE.MainForm.pas

@@ -5893,7 +5893,8 @@ begin
       { Buiild file list }
       { Buiild file list }
       Files.Add(FMainMemo.Filename);
       Files.Add(FMainMemo.Filename);
       for var IncludedFile in FIncludedFiles do
       for var IncludedFile in FIncludedFiles do
-        Files.Add(IncludedFile.Filename);
+        if IncludedFile.Memo <> nil then
+          Files.Add(IncludedFile.Filename);
       if FPreprocessorOutputMemo.Used then
       if FPreprocessorOutputMemo.Used then
         Files.Add(MemosTabSet.Tabs[MemoToTabIndex(FPreprocessorOutputMemo)]);
         Files.Add(MemosTabSet.Tabs[MemoToTabIndex(FPreprocessorOutputMemo)]);