[compuin]

Estimados,

Finalmente lo resolvi asi:

Código Delphi [-]
var
  i:Integer;
  Louble;
  Bouble;
  Rouble;
  JDEouble;
  Long:array [1..12] of Double;
  Lati:array [1..12] of Double;

...

Begin

  for i:= 0 to 7 do
   begin
    PosPlanet(i,At_JDE,L,B,R);
      Long[i]:= L;
      Lati[i]:= B;
   end;

  //planetas
  for i := 1 to 12 do
   begin
      StringGrid1.Cells[0,i+0] := PlanetNames[i-1];
      StringGrid1.Cells[1,i+1] := ZodiacName(Long[i-1]);
      StringGrid1.Cells[2,i+1] := AngleToStr(Long[i-1]);
      StringGrid1.Cells[3,i+1] := AngleToStr(Lati[i-1]);
   end;

end;

Muchisimas gracias a todos los que me aportaron su valioso tiempo y conocimiento para poder avanzar en este proyecto!

Saludos