Hola.
Aunque ha pasado mucho tiempo desde que se hizo la pregunta, incluyo esta información para cualquier persona que encuentre la consulta en el foro o desde un buscador de Internet.
Los algoritmos para calcular las posiciones planetarias y de las casas astrológicas son muy complejos y no aptos para aficionados, posiblemente tampoco para "avanzados"; creo que solo para especialistas.
Sin embargo, hay unas rutinas ya hechas que se pueden usar gratuitamente sin se usarán para hacer un programa gratuito y con ciertas condiciones (leer el texto de el/los autor/es. Esas rutinas se llamana
Swiss ephemeris en
http://www.astro.com/swisseph/swephinfo_e.htm?lang=s.
Incluyen (al menos hace tiempo) un demo en Delphi 2 que funcionaba con Delphi 5 y 7. También lo probé con Lázarus y funcionaba.
Te aseguro que esas rutinas ahorran el 90% del trabajo de desarrollo por lo menos.
También hay un programa completo que incluye el código fuente en Delphi XE3 y que incorpora todo lo necesario, incluido los gráficos y también tiene opciones avanzadas. Ese programa se llama
What Watch en
http://www.papertv.com/.
Ese programa antes incluía el código fuente en Delphi 7. Si por casualidad, alguien lo tiene, que me lo haga saber, pues no logro encontrarlo y me interesa. El autor (o uno de ellos), me dijo que no lo conserva.
Saludos.