Llenar array

[ecfisa]

Hola compuin.

Leí todos tus mensajes y no entiendo el problema. Sincenramente creo que es por que la información que nos das es escasa o inconéxa.

En esto de comunicarnos es fundamental que nos pongamos de acuerdo, tanto el emisor como el receptor.
No me cabe duda alguna que tu intención era explicar el problema lo mejor posible así como también, que los que participaron en las respuestas tuvieron la firme intención de ayudarte desinteresadamente como siempre lo hacen.

Lo importante aquí, creo yo, es que soluciones tu problema y no seguir en discuciones inconducentes. Rebobinemos y por favor plantea el problema de otro modo ya que del anterior no logramos entenderlo.

Saludos

[[escafandra]]

Yo tampoco entiendo bien el asunto, faltan cosas. Creo que lo que pretende compuin es algo como esto:

Código Delphi [-]
var
  i, iflag: integer;
  xx:       array[0..5] of double;
  planet:   array [1..12] of double;
  serr:     PChar;
begin
  for i:= 1 to 12 do
  begin
    swe_calc_ut(Date.JulDay, i, iflag, xx[0], serr);
    planet[i]:= xx[0];
  end;
end;

Asumiendo que:
1.- Los indices de planeta van de 1 a 12 (pueden ser 0-11) según la función no documentada swe_calc_ut
2.- La fecha se sabrá y se inicializará.
3.- iflag se conocerá y se inicializará.

Saludos.

[compuin]

Hola escafandra

Efectivamente, tanto la fecha como iflag estan inicializados

Esta es la funcion como tal

Código Delphi [-]
function swe_calc_ut(tjd         : double;    {Julian day, Universal Time}
                     ipl         : Integer;   {planet number}
                     iflag       : Longint;   {flag bits}
                     var xx      : double;    {first of 6 doubles}
                     sErr        : PChar      {Error-String}
): Longint; stdcall; far; external 'swedll32.dll' name '_swe_calc_ut@24';

[[movorack]]

Empezado por compuin

Respeto antes que nada, las ironias creo estan de mas

Tienes razón, no faltaba mas que alguien vaya y se mofe de tu falta de conocimientos técnicos para exponer el problema, de los problemas de redacción, y mucho menos de la falta de claridad. O hasta de pronto de la falta de comprensión lectora, Porque ya leíste la guia de estilo cierto?

En fin, tienes razón.

Empezado por ecfisa

Hola compuin.

Leí todos tus mensajes y no entiendo el problema. Sincenramente creo que es por que la información que nos das es escasa o inconéxa.

¡Vaya, vaya! Que ecfisa no te halla comprendido muestra lo mal explicado que está.

Empezado por compuin

Hola escafandra

Efectivamente, tanto la fecha como iflag estan inicializados

Esta es la funcion como tal

Código Delphi [-]
function swe_calc_ut(tjd         : double;    {Julian day, Universal Time}
                     ipl         : Integer;   {planet number}
                     iflag       : Longint;   {flag bits}
                     var xx      : double;    {first of 6 doubles}
                     sErr        : PChar      {Error-String}
): Longint; stdcall; far; external 'swedll32.dll' name '_swe_calc_ut@24';

Y... me quedo sin saber aún cual es el problema, porque no funciona, como quieres que funcione, si van a sacar una segunda película de The Joker.

[compuin]

Movorack

Sin comentarios

[compuin]

Empezado por movorack

Tienes razón, no faltaba mas que alguien vaya y se mofe de tu falta de conocimientos técnicos para exponer el problema, de los problemas de redacción, y mucho menos de la falta de claridad. O hasta de pronto de la falta de comprensión lectora, Porque ya leíste la guia de estilo cierto?

En fin, tienes razón.



¡Vaya, vaya! Que ecfisa no te halla comprendido muestra lo mal explicado que está.



Y... me quedo sin saber aún cual es el problema, porque no funciona, como quieres que funcione, si van a sacar una segunda película de The Joker.

Bueno si, solo un comentario mas....payaso seras tu!

[Casimiro Notevi]

Empezado por compuin

Bueno si, solo un comentario mas....payaso seras tu!

Sigue así, y serás expulsado.

[compuin]

Empezado por compuin

Bueno si, solo un comentario mas....payaso seras tu!

Y el que me llamo Joker no cierto??

[[escafandra]]

Calma. Creo que hay un acúmulo de malas interpretaciones. Por un lado tenemos un usuario con poca experiencia pero con ganas de resolver un tema y por otro lado foristas que con ganas de prestar ayuda no terminamos de entender el tema en profundidad. Frustración por ambas partes. Entiendo que cuando alguien tiene poca experiencia le resulta complejo explicarse. El problema es que la gente más experta también tiene problemas en entender puesto que se necesita precisión en la pregunta. Si aparecen suspicacias se pierde el sentido y ultimo fin, que es la ayuda desinteresada. No hay magos de sabiduría infinita que todo lo entiendan al vuelo como tampoco hay gente que consiga hacerse entender en problemas que le resultan complejos. Con buena voluntad las cosas van saliendo y así ha sido siempre.

Yo pediría a compuin que trate de estudiar mejor su problema para poder preguntar con mayor precisión, que es la garantía de buenas respuestas y soluciones. También pediría al resto, comprensión ante la dificultad de explicarse pues no creo que sea deliberada. Creo que compuin debería abordar temas más pequeños para familiarizarse con delphi y la forma de encarar los problemas desde el punto de vista del programador y, sobre todo, no tener prisa en abordar nuevas cuestiones sin tener claras al 100% las previas, es la única forma de aprender con provecho.

Saludos.