Pascal/Turbo Pascal - dibujas esferas 3d en pascal

Hola , me gustaria dibujar una esfera en 3d en pascal pero no se como, si alguien me lo puede indicar le estaria muy agradecido.
Muchas gracias

i:=0;
while i <= 100 do
begin
Ellipse(100,100,360,0, 100, i);
inc(i,10);
end;
:).

Si quieres aprender mas acerca de la programacion en 3D en pascal en:

http://mx.geocities.com/antrahxg

en la seccion de links dentro de la seccion de Pascal hay un vinculo a una pagina para aprender la programacion en 3D