📄 qgl_win.pas
字号:
GPA (@qglPixelStorei , @dllPixelStorei , 'glPixelStorei');
GPA (@qglPixelTransferf , @dllPixelTransferf , 'glPixelTransferf');
GPA (@qglPixelTransferi , @dllPixelTransferi , 'glPixelTransferi');
GPA (@qglPixelZoom , @dllPixelZoom , 'glPixelZoom');
GPA (@qglPointSize , @dllPointSize , 'glPointSize');
GPA (@qglPolygonMode , @dllPolygonMode , 'glPolygonMode');
GPA (@qglPolygonOffset , @dllPolygonOffset , 'glPolygonOffset');
GPA (@qglPolygonStipple , @dllPolygonStipple , 'glPolygonStipple');
GPA (@qglPopAttrib , @dllPopAttrib , 'glPopAttrib');
GPA (@qglPopClientAttrib , @dllPopClientAttrib , 'glPopClientAttrib');
GPA (@qglPopMatrix , @dllPopMatrix , 'glPopMatrix');
GPA (@qglPopName , @dllPopName , 'glPopName');
GPA (@qglPrioritizeTextures , @dllPrioritizeTextures , 'glPrioritizeTextures');
GPA (@qglPushAttrib , @dllPushAttrib , 'glPushAttrib');
GPA (@qglPushClientAttrib , @dllPushClientAttrib , 'glPushClientAttrib');
GPA (@qglPushMatrix , @dllPushMatrix , 'glPushMatrix');
GPA (@qglPushName , @dllPushName , 'glPushName');
GPA (@qglRasterPos2d , @dllRasterPos2d , 'glRasterPos2d');
GPA (@qglRasterPos2dv , @dllRasterPos2dv , 'glRasterPos2dv');
GPA (@qglRasterPos2f , @dllRasterPos2f , 'glRasterPos2f');
GPA (@qglRasterPos2fv , @dllRasterPos2fv , 'glRasterPos2fv');
GPA (@qglRasterPos2i , @dllRasterPos2i , 'glRasterPos2i');
GPA (@qglRasterPos2iv , @dllRasterPos2iv , 'glRasterPos2iv');
GPA (@qglRasterPos2s , @dllRasterPos2s , 'glRasterPos2s');
GPA (@qglRasterPos2sv , @dllRasterPos2sv , 'glRasterPos2sv');
GPA (@qglRasterPos3d , @dllRasterPos3d , 'glRasterPos3d');
GPA (@qglRasterPos3dv , @dllRasterPos3dv , 'glRasterPos3dv');
GPA (@qglRasterPos3f , @dllRasterPos3f , 'glRasterPos3f');
GPA (@qglRasterPos3fv , @dllRasterPos3fv , 'glRasterPos3fv');
GPA (@qglRasterPos3i , @dllRasterPos3i , 'glRasterPos3i');
GPA (@qglRasterPos3iv , @dllRasterPos3iv , 'glRasterPos3iv');
GPA (@qglRasterPos3s , @dllRasterPos3s , 'glRasterPos3s');
GPA (@qglRasterPos3sv , @dllRasterPos3sv , 'glRasterPos3sv');
GPA (@qglRasterPos4d , @dllRasterPos4d , 'glRasterPos4d');
GPA (@qglRasterPos4dv , @dllRasterPos4dv , 'glRasterPos4dv');
GPA (@qglRasterPos4f , @dllRasterPos4f , 'glRasterPos4f');
GPA (@qglRasterPos4fv , @dllRasterPos4fv , 'glRasterPos4fv');
GPA (@qglRasterPos4i , @dllRasterPos4i , 'glRasterPos4i');
GPA (@qglRasterPos4iv , @dllRasterPos4iv , 'glRasterPos4iv');
GPA (@qglRasterPos4s , @dllRasterPos4s , 'glRasterPos4s');
GPA (@qglRasterPos4sv , @dllRasterPos4sv , 'glRasterPos4sv');
GPA (@qglReadBuffer , @dllReadBuffer , 'glReadBuffer');
GPA (@qglReadPixels , @dllReadPixels , 'glReadPixels');
GPA (@qglRectd , @dllRectd , 'glRectd');
GPA (@qglRectdv , @dllRectdv , 'glRectdv');
GPA (@qglRectf , @dllRectf , 'glRectf');
GPA (@qglRectfv , @dllRectfv , 'glRectfv');
GPA (@qglRecti , @dllRecti , 'glRecti');
GPA (@qglRectiv , @dllRectiv , 'glRectiv');
GPA (@qglRects , @dllRects , 'glRects');
GPA (@qglRectsv , @dllRectsv , 'glRectsv');
GPA (@qglRenderMode , @dllRenderMode , 'glRenderMode');
GPA (@qglRotated , @dllRotated , 'glRotated');
GPA (@qglRotatef , @dllRotatef , 'glRotatef');
GPA (@qglScaled , @dllScaled , 'glScaled');
GPA (@qglScalef , @dllScalef , 'glScalef');
GPA (@qglScissor , @dllScissor , 'glScissor');
GPA (@qglSelectBuffer , @dllSelectBuffer , 'glSelectBuffer');
GPA (@qglShadeModel , @dllShadeModel , 'glShadeModel');
GPA (@qglStencilFunc , @dllStencilFunc , 'glStencilFunc');
GPA (@qglStencilMask , @dllStencilMask , 'glStencilMask');
GPA (@qglStencilOp , @dllStencilOp , 'glStencilOp');
GPA (@qglTexCoord1d , @dllTexCoord1d , 'glTexCoord1d');
GPA (@qglTexCoord1dv , @dllTexCoord1dv , 'glTexCoord1dv');
GPA (@qglTexCoord1f , @dllTexCoord1f , 'glTexCoord1f');
GPA (@qglTexCoord1fv , @dllTexCoord1fv , 'glTexCoord1fv');
GPA (@qglTexCoord1i , @dllTexCoord1i , 'glTexCoord1i');
GPA (@qglTexCoord1iv , @dllTexCoord1iv , 'glTexCoord1iv');
GPA (@qglTexCoord1s , @dllTexCoord1s , 'glTexCoord1s');
GPA (@qglTexCoord1sv , @dllTexCoord1sv , 'glTexCoord1sv');
GPA (@qglTexCoord2d , @dllTexCoord2d , 'glTexCoord2d');
GPA (@qglTexCoord2dv , @dllTexCoord2dv , 'glTexCoord2dv');
GPA (@qglTexCoord2f , @dllTexCoord2f , 'glTexCoord2f');
GPA (@qglTexCoord2fv , @dllTexCoord2fv , 'glTexCoord2fv');
GPA (@qglTexCoord2i , @dllTexCoord2i , 'glTexCoord2i');
GPA (@qglTexCoord2iv , @dllTexCoord2iv , 'glTexCoord2iv');
GPA (@qglTexCoord2s , @dllTexCoord2s , 'glTexCoord2s');
GPA (@qglTexCoord2sv , @dllTexCoord2sv , 'glTexCoord2sv');
GPA (@qglTexCoord3d , @dllTexCoord3d , 'glTexCoord3d');
GPA (@qglTexCoord3dv , @dllTexCoord3dv , 'glTexCoord3dv');
GPA (@qglTexCoord3f , @dllTexCoord3f , 'glTexCoord3f');
GPA (@qglTexCoord3fv , @dllTexCoord3fv , 'glTexCoord3fv');
GPA (@qglTexCoord3i , @dllTexCoord3i , 'glTexCoord3i');
GPA (@qglTexCoord3iv , @dllTexCoord3iv , 'glTexCoord3iv');
GPA (@qglTexCoord3s , @dllTexCoord3s , 'glTexCoord3s');
GPA (@qglTexCoord3sv , @dllTexCoord3sv , 'glTexCoord3sv');
GPA (@qglTexCoord4d , @dllTexCoord4d , 'glTexCoord4d');
GPA (@qglTexCoord4dv , @dllTexCoord4dv , 'glTexCoord4dv');
GPA (@qglTexCoord4f , @dllTexCoord4f , 'glTexCoord4f');
GPA (@qglTexCoord4fv , @dllTexCoord4fv , 'glTexCoord4fv');
GPA (@qglTexCoord4i , @dllTexCoord4i , 'glTexCoord4i');
GPA (@qglTexCoord4iv , @dllTexCoord4iv , 'glTexCoord4iv');
GPA (@qglTexCoord4s , @dllTexCoord4s , 'glTexCoord4s');
GPA (@qglTexCoord4sv , @dllTexCoord4sv , 'glTexCoord4sv');
GPA (@qglTexCoordPointer , @dllTexCoordPointer , 'glTexCoordPointer');
GPA (@qglTexEnvf , @dllTexEnvf , 'glTexEnvf');
GPA (@qglTexEnvfv , @dllTexEnvfv , 'glTexEnvfv');
GPA (@qglTexEnvi , @dllTexEnvi , 'glTexEnvi');
GPA (@qglTexEnviv , @dllTexEnviv , 'glTexEnviv');
GPA (@qglTexGend , @dllTexGend , 'glTexGend');
GPA (@qglTexGendv , @dllTexGendv , 'glTexGendv');
GPA (@qglTexGenf , @dllTexGenf , 'glTexGenf');
GPA (@qglTexGenfv , @dllTexGenfv , 'glTexGenfv');
GPA (@qglTexGeni , @dllTexGeni , 'glTexGeni');
GPA (@qglTexGeniv , @dllTexGeniv , 'glTexGeniv');
GPA (@qglTexImage1D , @dllTexImage1D , 'glTexImage1D');
GPA (@qglTexImage2D , @dllTexImage2D , 'glTexImage2D');
GPA (@qglTexParameterf , @dllTexParameterf , 'glTexParameterf');
GPA (@qglTexParameterfv , @dllTexParameterfv , 'glTexParameterfv');
GPA (@qglTexParameteri , @dllTexParameteri , 'glTexParameteri');
GPA (@qglTexParameteriv , @dllTexParameteriv , 'glTexParameteriv');
GPA (@qglTexSubImage1D , @dllTexSubImage1D , 'glTexSubImage1D');
GPA (@qglTexSubImage2D , @dllTexSubImage2D , 'glTexSubImage2D');
GPA (@qglTranslated , @dllTranslated , 'glTranslated');
GPA (@qglTranslatef , @dllTranslatef , 'glTranslatef');
GPA (@qglVertex2d , @dllVertex2d , 'glVertex2d');
GPA (@qglVertex2dv , @dllVertex2dv , 'glVertex2dv');
GPA (@qglVertex2f , @dllVertex2f , 'glVertex2f');
GPA (@qglVertex2fv , @dllVertex2fv , 'glVertex2fv');
GPA (@qglVertex2i , @dllVertex2i , 'glVertex2i');
GPA (@qglVertex2iv , @dllVertex2iv , 'glVertex2iv');
GPA (@qglVertex2s , @dllVertex2s , 'glVertex2s');
GPA (@qglVertex2sv , @dllVertex2sv , 'glVertex2sv');
GPA (@qglVertex3d , @dllVertex3d , 'glVertex3d');
GPA (@qglVertex3dv , @dllVertex3dv , 'glVertex3dv');
GPA (@qglVertex3f , @dllVertex3f , 'glVertex3f');
GPA (@qglVertex3fv , @dllVertex3fv , 'glVertex3fv');
GPA (@qglVertex3i , @dllVertex3i , 'glVertex3i');
GPA (@qglVertex3iv , @dllVertex3iv , 'glVertex3iv');
GPA (@qglVertex3s , @dllVertex3s , 'glVertex3s');
GPA (@qglVertex3sv , @dllVertex3sv , 'glVertex3sv');
GPA (@qglVertex4d , @dllVertex4d , 'glVertex4d');
GPA (@qglVertex4dv , @dllVertex4dv , 'glVertex4dv');
GPA (@qglVertex4f , @dllVertex4f , 'glVertex4f');
GPA (@qglVertex4fv , @dllVertex4fv , 'glVertex4fv');
GPA (@qglVertex4i , @dllVertex4i , 'glVertex4i');
GPA (@qglVertex4iv , @dllVertex4iv , 'glVertex4iv');
GPA (@qglVertex4s , @dllVertex4s , 'glVertex4s');
GPA (@qglVertex4sv , @dllVertex4sv , 'glVertex4sv');
GPA (@qglVertexPointer , @dllVertexPointer , 'glVertexPointer');
GPA (@qglViewport , @dllViewport , 'glViewport');
GPA1 (@qwglCopyContext , 'wglCopyContext');
GPA1 (@qwglCreateContext , 'wglCreateContext');
GPA1 (@qwglCreateLayerContext , 'wglCreateLayerContext');
GPA1 (@qwglDeleteContext , 'wglDeleteContext');
GPA1 (@qwglDescribeLayerPlane , 'wglDescribeLayerPlane');
GPA1 (@qwglGetCurrentContext , 'wglGetCurrentContext');
GPA1 (@qwglGetCurrentDC , 'wglGetCurrentDC');
GPA1 (@qwglGetLayerPaletteEntries , 'wglGetLayerPaletteEntries');
GPA1 (@qwglGetProcAddress , 'wglGetProcAddress');
GPA1 (@qwglMakeCurrent , 'wglMakeCurrent');
GPA1 (@qwglRealizeLayerPalette , 'wglRealizeLayerPalette');
GPA1 (@qwglSetLayerPaletteEntries , 'wglSetLayerPaletteEntries');
GPA1 (@qwglShareLists , 'wglShareLists');
GPA1 (@qwglSwapLayerBuffers , 'wglSwapLayerBuffers');
GPA1 (@qwglUseFontBitmaps , 'wglUseFontBitmapsA');
GPA1 (@qwglUseFontOutlines , 'wglUseFontOutlinesA');
GPA1 (@qwglChoosePixelFormat , 'wglChoosePixelFormat');
GPA1 (@qwglDescribePixelFormat , 'wglDescribePixelFormat');
GPA1 (@qwglGetPixelFormat , 'wglGetPixelFormat');
GPA1 (@qwglSetPixelFormat , 'wglSetPixelFormat');
GPA1 (@qwglSwapBuffers , 'wglSwapBuffers');
qwglSwapIntervalEXT := Nil;
qglPointParameterfEXT := Nil;
qglPointParameterfvEXT := Nil;
qglColorTableEXT := Nil;
qglSelectTextureSGIS := Nil;
qglMTexCoord2fSGIS := Nil;
Result := true;
end;//function
procedure GLimp_EnableLogging (enable : qboolean);
var
F : textfile; {666}
begin
if enable
then begin
// if ( !glw_state.log_fp ) then
//PAS-code for "var F : textfile"
if (TTextRec(F).Mode = fmClosed) or (TTextRec(F).Name = '') then
begin
(*666 struct tm *newtime;
time_t aclock;
char buffer[1024];
time( &aclock );
newtime = localtime( &aclock );
asctime( newtime );
Com_sprintf (buffer, sizeof(buffer), '%s/gl.log', ri.FS_Gamedir());
// glw_state.log_fp = fopen( buffer, 'wt');
// fprintf( glw_state.log_fp, '%s'#10, asctime( newtime ));
AssignFile (glw_state.log_fp, buffer); //'wt'
Rewrite (glw_state.log_fp);
WriteLn (glw_state.log_fp, Format('%s'#10, [asctime(newtime)])); 666*)
end;
qglAccum := logAccum;
qglAlphaFunc := logAlphaFunc;
qglAreTexturesResident := logAreTexturesResident;
qglArrayElement := logArrayElement;
qglBegin := logBegin;
qglBindTexture := logBindTexture;
qglBitmap := logBitmap;
qglBlendFunc := logBlendFunc;
qglCallList := logCallList;
qglCallLists := logCallLists;
qglClear := logClear;
qglClearAccum := logClearAccum;
qglClearColor := logClearColor;
qglClearDepth := logClearDepth;
qglClearIndex := logClearIndex;
qglClearStencil := logClearStencil;
qglClipPlane := logClipPlane;
qglColor3b := logColor3b;
qglColor3bv := logColor3bv;
qglColor3d := logColor3d;
qglColor3dv := logColor3dv;
qglColor3f := logColor3f;
qglColor3fv := logColor3fv;
qglColor3i := logColor3i;
qglColor3iv := logColor3iv;
qglColor3s := logColor3s;
qglColor3sv := logColor3sv;
qglColor3ub := logColor3ub;
qglColor3ubv := logColor3ubv;
qglColor3ui := logColor3ui;
qglColor3uiv := logColor3uiv;
qglColor3us := logColor3us;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -