Browse Source

* GL_ARB_Vertex_buffer_object returned true when it should be false in some cases, mantis 12128

git-svn-id: trunk@11754 -
marco 17 years ago
parent
commit
bf98838366
1 changed files with 2 additions and 2 deletions
  1. 2 2
      packages/opengl/src/glext.pp

+ 2 - 2
packages/opengl/src/glext.pp

@@ -7588,7 +7588,7 @@ function load_GL_ARB_vertex_buffer_object : boolean;
 var extstring:string;
 var extstring:string;
 
 
 begin
 begin
-  load_GL_ARB_vertex_buffer_object:=false;
+  Result:=false;
   extstring := String(PChar(glGetString(GL_EXTENSIONS)));
   extstring := String(PChar(glGetString(GL_EXTENSIONS)));
   if glext_ExtensionSupported('GL_ARB_vertex_buffer_object',extstring) then
   if glext_ExtensionSupported('GL_ARB_vertex_buffer_object',extstring) then
     begin
     begin
@@ -7612,8 +7612,8 @@ begin
       if not Assigned(glGetBufferParameterivARB) then Exit;
       if not Assigned(glGetBufferParameterivARB) then Exit;
       glGetBufferPointervARB := wglGetProcAddress('glGetBufferPointervARB');
       glGetBufferPointervARB := wglGetProcAddress('glGetBufferPointervARB');
       if not Assigned(glGetBufferPointervARB) then Exit;
       if not Assigned(glGetBufferPointervARB) then Exit;
+      Result:=true;
     end;
     end;
-  load_GL_ARB_vertex_buffer_object:=true;
 end;
 end;
 
 
 {$IFDEF Windows}
 {$IFDEF Windows}