Browse Source

Fix windows compilation

maciej-izak 7 năm trước cách đây
mục cha
commit
8e93a98494
1 tập tin đã thay đổi với 3 bổ sung3 xóa
  1. 3 3
      PasOpenCL/DelphiCL.pas

+ 3 - 3
PasOpenCL/DelphiCL.pas

@@ -2192,9 +2192,9 @@ begin
   //MacOsX not yet (Andoid hm....)
   //MacOSX, Linux, Windows: http://www.dyn-lab.com/articles/cl-gl.html
   {$IFDEF WINDOWS}
-    props[1] := wglGetCurrentContext();//glXGetCurrentContext(),
-    props[2] := CL_WGL_HDC_KHR;
-    props[3] := wglGetCurrentDC();//glXGetCurrentDisplay(),
+    props[1] := Pointer(wglGetCurrentContext());//glXGetCurrentContext(),
+    props[2] := Pointer(CL_WGL_HDC_KHR);
+    props[3] := Pointer(wglGetCurrentDC());//glXGetCurrentDisplay(),
   {$ENDIF}
   {$IFDEF LINUX}
     props[1] := glXGetCurrentContext();