From: Bergmann89 Date: Sun, 24 Nov 2013 14:49:09 +0000 (+0100) Subject: * free lib handles on finalization X-Git-Tag: v3.0.0~2 X-Git-Url: https://git.delphigl.com/?a=commitdiff_plain;h=baac1343d396a4a1cfdab8a0cef937981c91efdf;p=glBitmap.git * free lib handles on finalization --- diff --git a/glBitmap.pas b/glBitmap.pas index 7c6e840..07317a3 100644 --- a/glBitmap.pas +++ b/glBitmap.pas @@ -8559,8 +8559,15 @@ initialization finalization TFormatDescriptor.Finalize; +{$IFDEF GLB_NATIVE_OGL} + if Assigned(GL_LibHandle) then + glbFreeLibrary(GL_LibHandle); + {$IFDEF GLB_NATIVE_OGL_DYNAMIC} + if Assigned(GLU_LibHandle) then + glbFreeLibrary(GLU_LibHandle); FreeAndNil(InitOpenGLCS); {$ENDIF} +{$ENDIF} -end. \ No newline at end of file +end.