aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens/UScreenMain.pas
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--Game/Code/Screens/UScreenMain.pas9
1 files changed, 9 insertions, 0 deletions
diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas
index b2b4c497..4b6c58a4 100644
--- a/Game/Code/Screens/UScreenMain.pas
+++ b/Game/Code/Screens/UScreenMain.pas
@@ -14,6 +14,8 @@ type
TextDescription: integer;
TextDescriptionLong: integer;
+ ShowNumErrors: boolean;
+
constructor Create; override;
function ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean; override;
procedure onShow; override;
@@ -262,6 +264,7 @@ begin
AddButton(Theme.Main.ButtonExit);
Interaction := 0;
+ ShowNumErrors := false;
end;
procedure TScreenMain.onShow;
@@ -273,6 +276,12 @@ begin
PlaylistMan.Mode := 0;
if not Help.SetHelpID(ID) then
Log.LogError('No Entry for Help-ID ' + ID + ' (ScreenMain)');
+
+ if ShowNumErrors then
+ begin
+ ShowNumErrors := false;
+ ScreenPopupError.ShowPopup(IntToStr(Log.NumErrors) + ' errors on loading, see Error.log for details');
+ end;
end;
procedure TScreenMain.InteractNext;