Como mostrar los contenidos de registros

[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;