anchor.diff:    pData[3] := $00000000;
     fTextB := TRender.GenTexture(4, 1, @pData[0], tfRGBA8);
   
  -  fUseVBO := VBOSupported and not RENDER_3D;
  +  fUseVBO := DoUseVBO;
   
     if fUseVBO then
     begin
  
positive.code: end;
  
  
  function TRenderTerrain.VBOSupported:Boolean;
  begin
    //Some GPUs don't comply with OpenGL 1.5 spec on VBOs, so check Assigned instead of GL_VERSION_1_5
    Result := Assigned(glGenBuffers)        and Assigned(glBindBuffer)    and Assigned(glBufferData) and
              Assigned(glEnableClientState) and Assigned(glVertexPointer) and Assigned(glClientActiveTexture) and
              Assigned(glTexCoordPointer)   and Assigned(glDrawElements)  and Assigned(glDisableClientState) and
              Assigned(glDeleteBuffers);
  end;
  
  
  
negative.code:     procedure RenderFence(aFence: TKMFenceType; Pos: TKMDirection; pX,pY: Integer);
      procedure RenderMarkup(pX, pY: Word; aFieldType: TKMFieldType);
      procedure DoRenderTile(aTerrainId: Word; pX,pY,Rot: Integer; aDoBindTexture: Boolean; aUseTileLookup: Boolean; DoHighlight: Boolean = False; HighlightColor: Cardinal = 0);
      function DoUseVBO: Boolean;
    public
      constructor Create;
      destructor Destroy; override;
  