diff --git a/PlatformUtils.pas b/PlatformUtils.pas index 2259529..c12d962 100644 --- a/PlatformUtils.pas +++ b/PlatformUtils.pas @@ -35,6 +35,11 @@ begin if (S = '--opengl') or (S = '-opengl') or (S = '/opengl') then Exit(True); end; + // Бандл под LaunchServices не может передать argv, поэтому тот же + // переключатель читается из окружения (Info.plist -> LSEnvironment). + S := LowerCase(Trim(GetEnvironmentVariable('EWSDR_OPENGL'))); + if (S = '1') or (S = 'true') or (S = 'yes') or (S = 'on') then + Exit(True); end; function CurrentScreenDPI: Integer;