X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_menu.pas;h=9749ad077c3ac0e4e9d8c75e8d6f2a71c79cd712;hb=7f582aab480b6d0280751d5bcacc54437cba2cc5;hp=8db3d9a0c51761775d0544d22296183deef7c4e7;hpb=9ebf2e197ffc28b9428e69170a76476e8eb6604c;p=d2df-sdl.git

diff --git a/src/game/g_menu.pas b/src/game/g_menu.pas
index 8db3d9a..9749ad0 100644
--- a/src/game/g_menu.pas
+++ b/src/game/g_menu.pas
@@ -1878,7 +1878,11 @@ begin
 
   with TGUIListBox(menu.GetControl('lsResolution')) do
   begin
-    list := sys_GetDisplayModes(gBPP);
+    {$IFDEF ENABLE_SYSTEM}
+      list := sys_GetDisplayModes(gBPP);
+    {$ELSE}
+      list := nil;
+    {$ENDIF}
     if list <> nil then
     begin
       Items := list;