Witam.
W poniższej procedurze następuje rysowanie kuli, mamy kulę o 30 równoleżnikach i 30 południkach z tym, że południki są skierowane poziomo - wzdłuż osi OX. Jak narysować tą kulę tak żeby były one skierowane ku górze wzdłuż OY.
Nie chodzi mi o późniejszy obrót poprzez funkcję glRotatef wraz z całym układem współrzędnych tylko startowe narysowanie jej w taki sposób aby oś Y była skierowana ku górze (oś X oczywiście w prawo oś Y z oddali do bliskości) a południki kuli były wzdłuż osi OY w pionie.
procedure TForm1.RysujGLU(rozmiar :Single);
var
kwadryka :GLUQuadricObj;
begin
glColor4ub(255,255,255,255);
kwadryka:=gluNewQuadric; //tworzenie obiektu kwadryki
gluQuadricDrawStyle(kwadryka,GLU_LINE);
gluSphere(kwadryka,rozmiar,30,30); //rysowanie
gluDeleteQuadric(kwadryka); //usuwanie obiektu
end;