From 077bf73bdd73d3146df7aba0d6d7dec0403544c4 Mon Sep 17 00:00:00 2001 From: blaszijk Date: Tue, 16 Aug 2011 20:37:20 +0000 Subject: [PATCH] Added check if OpenGL version 2.0 is loaded properly git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1806 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- .../nvidia-widgets/src/nvwidgets/nvglutwidgets.pas | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) mode change 100644 => 100755 components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas diff --git a/components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas b/components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas old mode 100644 new mode 100755 index c590b3936..f65f968b6 --- a/components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas +++ b/components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas @@ -117,14 +117,15 @@ function GlutUIContext.init(w, h: integer): boolean; begin Result := False; - Load_GL_version_2_0; + if not Load_GL_version_2_0 then + begin + writeln('OpenGL version 2.0 not loaded properly'); + exit; + end; if not glext_ExtensionSupported('GL_ARB_vertex_program', '') or not glext_ExtensionSupported('GL_ARB_fragment_program', '') then - begin - Result := False; exit; - end; reshape(w, h); Result := True;