Como mostrar los contenidos de registros

[valera]

hola muchachos del foro, estoy practicando en delphi con los registros(record) de la siguiente estructura:TYPE
persona=record
nombre:string;
edad:integer;
tel:string;
f_nac:string;
sexo:string;
civil:string;
futbol:string;
atletismo:string;
otros:string;
natacion:string;
basquetball:string;
estudio:string;
end;
var per:array [0..5]of persona;

esta estructura lo defino en mi form2 y en esta forma doy de alta a las personas, el problema empieza cuando quiero hacer la consulta en otra forma(form3), si muestra la forma pero no muestra los datos porque el registro no esta definido en esta forma(form3), entonces si alguien sabe como hacerlo, le agradeceria mucho su ayuda. de ante mano muchas gracias.

[roman]

Si quieres desde form3 acceder a elementos que estén definidos en la unidad del form2 debes incluir ésta en la cláusula uses:

Código Delphi [-]
unit3;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Unit2;

type
  TForm3 = class(TForm)
    ...
  end;

etc.

Un favor: en lo sucesivo intenta usar la etiqueta [ delphi ] y adecuada indentación para publicar código. Por ejemplo:

Código Delphi [-]
persona = record
  nombre: string;
  edad: integer;
  tel: string;
  f_nac: string;
  sexo: string;
  civil: string;
  futbol: string;
  atletismo: string;
  otros: string;
  natacion: string;
  basquetball: string;
  estudio: string;
end;

 var
   per:array [0..5]of persona;

// Saludos

[valera]

este es el codigo con el quiero mostrar el contenido del registro a otra forma(form3)y utilizo un StringGrid(ver)

 
for I:=1 to 3 do 
   begin 
	form3.ver.Cells[0,I]:=per[i].nombre;
	form3.ver.Cells[1,I]:=inttostr(per[i].Edad);
	form3.ver.Cells[2,I]:= per[i].Tel;
	form3.ver.Cells[3,I]:= per[i].F_nac;
	form3.ver.Cells[4,I]:= per[i].Sexo;
	form3.ver.Cells[5,I]:= per[i].Civil;
	form3.ver.Cells[6,I]:= per[i].Deporte;
	form3.ver.Cells[7,I]:= per[i].Estudio;
 end;

[[Lepe]]

Vayamos por partes:

- Si vas a usar ese record en varias ventanas, es mejor crear una unidad nueva Upublica (File --> new --> Unit), y ahora, desde cualquier ventana, añades Uses Upublica;. Así tienes las cosas mejor organizadas, y no tendrás referencias cíclicas.

- Por otra parte lo comentado por roman es totalmente correcto, si dices que no funciona, deberías explicar el error que te da.


Offtopic: la proxima vez que vayas a poner codigo fuente, en lugar de usar la palabra "code" entre corchetes, pon "delphi", queda mucho mejor.

[roman]

Empezado por Lepe

- Por otra parte lo comentado por roman es totalmente correcto, si dices que no funciona, deberías explicar el error que te da.

¿Yo dije esto? Lepe, tus dones telepáticos me sorprenden.

// Saludos

[[Lepe]]

roman, perdona pero ho he captado yo "la broma"

Despues de tu primera respuesta, Valera titula su nuevo mensaje como: "Disculpa pero no lo hace"; de ahí que corroborase tu solución.

¿Me he perdido algo? ¿o es que ya no lees los títulos de los mensajes? Ahh... claro, como la mayoría no estan bien puestos...

saludos

[roman]

Empezado por Lepe

[
¿o es que ya no lees los títulos de los mensajes?

Pues a decir verdad, muchas veces estos subtítulos se me escapan. Pondré más atención.

// Saludos

[GALLETO82]

Tengo Una Bron Ca No Se Como Puedo Mostrar Los Datos De Un Arreglo No Se Si Me Puedan Ayudar

[dec]

Hola,

GALLETO84, por favor, revisa las guías de estilo de estos Foros, una u otra. Bienvenido al ClubDelphi.

[GALLETO82]

no en cuentro la manera de poder guardar datos de un arraglo en una forma (form1) para despues poder mostrarlos en otra forma (form2), no son arreglos bidimensionales,

[[Lepe]]

¿Algo así te sirve?

Código Delphi [-]

TArreglo = array of string;

TForm1 = class 
...

public
  MiArreglo : TArreglo;
  MiArreglo2 : array [0..300] of string;

end;

-----------
uses Unit1; // siendo Unit1 la unidad del Form1.

Tform2 = class....

Saludos