830         CircleVertex[i].Y := Y + Radius*sin(i*pi/180);

   830         CircleVertex[i].Y := Y + Radius*sin(i*pi/180);

   831     end;

   831     end;

   832     glDisable(GL_TEXTURE_2D);

   832     glDisable(GL_TEXTURE_2D);

   833     glEnable(GL_LINE_SMOOTH);

   833     glEnable(GL_LINE_SMOOTH);

   834     glPushMatrix;

   834     glPushMatrix;

   836     glLineWidth(Width);

   835     glLineWidth(Width);

   837     Tint(r, g, b, a);

   836     Tint(r, g, b, a);

   838     glVertexPointer(2, GL_FLOAT, 0, @CircleVertex[0]);

   837     glVertexPointer(2, GL_FLOAT, 0, @CircleVertex[0]);

   839     glDrawArrays(GL_LINE_LOOP, 0, 360);

   838     glDrawArrays(GL_LINE_LOOP, 0, 360);

   840     Tint($FF, $FF, $FF, $FF);

   839     Tint($FF, $FF, $FF, $FF);