Cargar datos en array para mostrar
Hola foro,
Tengo la siguiente situacion Tengo las siguentes variables
Tengo una procedure que lee los siguientes parametros, nombre de planeta, fecha juliana y longitud, latitud y radio, asi
Esta procedure devuelve el valor de L, B y R dependiendo del planeta (Sol hasta Neptuno). Como puedo hacer para crear un arreglo que me almacene el resultado de cada planeta para luego mostrarlo con un bucle FOR? Gracias de antemano |
Hola.
Podes usar un arreglo de record, vg.r.:
Salida: Saludos :) |
Muchas gracias por el ejemplo
Pero aca no veo como lleno el valor de cada planeta en el arreglo desde la funcion LBR_For para cada uno de ellos |
Basicamente necesito algo asi,
Tengo
Y esta es la funcion para conseguir los valores del Sol, por ejemplo:
Lo que me devuelva la funcion, asignarselo a
Y asi, lo mismo para el resto de los planetas |
Hola.
No entiendo bien la situación, pero supongo que tendrías que cambiar el tipo del argumento de la función, por ejemplo:
Saludos :) |
Gracias,
Si mas o menos por ahi van los tiros, pero como hago para que pueda hacer esto para cada planeta sin que me arroje error por usar las mismas variables para cada uno de los planetas y luego llenar con un FOR un stringgrid para mostrar los valores de cada planeta? |
Hola.
Si tienes: Puedes llamar a la función con cada miembro del arreglo, v. gr.:
Saludos :) |
Pero alli es donde esta mi confusion ya que cada planeta tiene la misma cantidad de parametros, es decir, las mismas variables L,B,R y no encuentro como hacer para usar la mismas variables para todos los planetas
|
Cita:
Usando un arreglo, todos los planetas usan los mismos nombres de variables: Código:
Planeta 1 (vp[1]) -> Lat, Lon, Rad Ahora si deseas "usar las mismas variables para todos los planetas" quiere decir que todos los planetas tendrán los mismos valores en L,B,R ¿ o no ? Saludos :) |
L,B,R van a tomar el valor correspondiente de cada planeta luego del retorno de la funcion
Es decir, tendre L,B,R para el Sol, L,B,R para Mercurio, etc El problema es que lo estoy haciendo llamando a la funcion cada vez que quiero calcular cada planeta, entonces tengo muchas lineas de codigo repitiendo lo mismo, la idea es poder hacerlo en un solo llamado pero que calcule y retorne los resultados de los planetas de una vez No se si ya me hice entender |
Hola.
Cita:
Saludos :) |
Gracias
Lo pruebo y te comento. Saludos |
Perdón, no sé donde puse la cabeza... :o
Olvida el mensaje anterior, debería haber sido:
Saludos :) |
En este caso, cuando vaya a mostrar el platena en un Grid, lo estoy haciendo asi,
Caso Sol:
Caso Mercurio
Cuando quiero mostrar todos los planetas tengo que crear una variable L(algo), B(algo) para mostrar los resultados por cada planeta. La idea de poderlo hacer mas sencillo con la mismas variables Lo,Bo y Ro Es esto posible o existe otra mejor practica para hacerlo? |
Hola.
A ver, te pongo un ejemplo ultra simplificado de que es lo que comprendí y como lo haría, tal vez nos ayude a entendernos.
El resultado: Saludos :) |
Si, esto es lo que necesito pero en la procedure de CargarPlaneta que colocastes utilizo la anterior o la que estas colocando alli??
Esta es la parte que me confunde un poco, ya que ahora la procedure luce asi
Cual es la correcta? |
Hola.
En tu caso creo que es la primera, la que utiliza las funciónes "LBR_For_xxxx" (de las que desconozco todo). La del ejemplo fué eso; un ejemplo. Es decir, deberías llenar cada uno de los elementos del arreglo de planetas con los valores que obtengas de cada función "LBR_For_xxxx" que le corresponda. Saludos :) |
Hola
Esto es lo que hace LBR_For_Mercury...hay un procedure por cada planeta
|
Entonces, si declaras tu arreglo de planetas así:
De este modo podras cargar sus valores de una vez:
Saludos :) |
Y para llenar el StringGrid?
|
La franja horaria es GMT +2. Ahora son las 22:11:06. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi