- function glProcedure(ProcName : PChar) : Pointer;
- begin
- result := NIL;
- if Addr(wglGetProcAddress)<>NIL then
- result := wglGetProcAddress(ProcName);
- if result<>NIL then Exit;
- result := GetProcAddress(GLHandle, ProcName);
- end;
OpenGL 4.5 HeaderModerator: DGL-Team
|