177 end;

   177 end;

   178 

   178 

   179 procedure RenderClear();

   179 procedure RenderClear();

   180 begin

   180 begin

   181     glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);

   181     glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);

   182 end;

   184 end;

   183 

   185 

   184 {$IFDEF USE_S3D_RENDERING}

   186 {$IFDEF USE_S3D_RENDERING}

   185 procedure RenderClear(mode: TRenderMode);

   187 procedure RenderClear(mode: TRenderMode);

   186 var frame: GLuint;

   188 var frame: GLuint;