瀏覽代碼

Added missing function for GLX_EXT_swap_control

master
saschawillems 11 年之前
父節點
當前提交
3450b7533b
共有 1 個文件被更改,包括 6 次插入0 次删除
  1. +6
    -0
      dglOpenGL.pas

+ 6
- 0
dglOpenGL.pas 查看文件

@@ -11137,6 +11137,8 @@ type
// GLX_EXT_texture_from_pixmap
TglXBindTexImageEXT = procedure(dpy: PDisplay; drawable: GLXDrawable; buffer: GLint; const attrib_list: PGLint); cdecl;
TglXReleaseTexImageEXT = procedure(dpy: PDisplay; drawable: GLXDrawable; buffer: GLint); cdecl;

TglXSwapIntervalEXT = procedure (dpy : PDisplay; drawable : GLXDrawable; interval : GLint); cdecl;
{$ENDIF}

// GL utility functions and procedures
@@ -14500,6 +14502,8 @@ var
// GLX_EXT_texture_from_pixmap
glXBindTexImageEXT: TglXBindTexImageEXT;
glXReleaseTexImageEXT: TglXReleaseTexImageEXT;

glXSwapIntervalEXT : TglXSwapIntervalEXT;
{$ENDIF}

// GL utility functions and procedures
@@ -15136,6 +15140,8 @@ begin
// GLX_EXT_texture_from_pixmap
glXBindTexImageEXT := dglGetProcAddress('glXBindTexImageEXT');
glXReleaseTexImageEXT := dglGetProcAddress('glXReleaseTexImageEXT');

glXSwapIntervalEXT := dglGetProcAddress('glXSwapIntervalEXT');
{$ENDIF}

Result := True;


Loading…
取消
儲存