paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added check if OpenGL version 2.0 is loaded properly

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1806 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blaszijk 2011-08-16 20:37:20 +00:00
parent 1a61e51299
commit 077bf73bdd
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
components/nvidia-widgets/src/nvwidgets/nvglutwidgets.pas Normal file → Executable file
View File

@ -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;