Отрисовка круга в OpenGl

[Oburec]

Есть у кого-нибудь готовая процедура для отрисовки круга (OpenGl)
(хочу как в 3д максе оси вращения отрисовывать). В советах по реализации не нуждаюсь, интересует готовая процедура (если есть у кого-то и не жаль поделиться)

[Selestis]

Готовой нет, но можете сделать что-то вроде этого:
(Не знаю как у вас реализованы типы, поэтому пишу общими словами)
Делаете 1 массив с вершинами круга(на плоскости) и забиваете его по формулам

while t < 360 do begin
Circle.Vertices[t].x:=r*cos(t);
Circle.Vertices[t].нЖ=r*sin(t);
inc(t,STEP);
end;

где STEP - точность
А когда нужно прорисовать круги по осям делаете так:

//x
glPushMatrix;
glColor4f(1,0,0,0.5);
glBegin(GL_LINE_LOOP);
for i:=0 to 360 div STEP do begin
glVertex3fv(@Circle.Vertices[i]);
end;
glEnd;
//то же самое тока матрицу помножить ещё перед этим всем для след. оси
glPopMatrix;
glPushMatrix;
glRotatef(90,1,0,0)
// предыдущий код
glPopMatrix;

Как-то так, надеюсь помог =)