Ver Mensaje Individual
  #1  
Antiguo 16-12-2011
glopez glopez is offline
Miembro
 
Registrado: ago 2003
Ubicación: Huelva
Posts: 76
Reputación: 21
glopez Va por buen camino
Problema con Array de Foms

Tengo implementado un Array de forms de la siguiente forma

Array_Ventanas : Array [0..Maximo_Ventanas_abiertas] of Tform;

En esta array voy guardando las ventanas que abro desde mi aplicacion, que pueden ser de clientes, proveedores articulos...
Las creo de la siguiente forma:

Array_Ventanas[x] := TFArticulos.Create(Self); // si es un articulo
Array_Ventanas[x] := TFClientes.Create(Self);// si es un cliente
...
El problema que tengo, es que si quiero acceder a por ejemplo a un label que está en todos mis forms (Label1) tengo que hacerlo de la siguiente forma:

TFArticulos(Array_ventanas[x]).Label1.Caption:='Prueba'; // si es un articulo
TFClientes(Array_ventanas[x]).Label1.Caption:='Prueba'; // si es un cliente
...

Es decir tengo que saber que tipo de form está en cada posición del array con lo que tengo un monton de lineas duplicadas.
¿Esto se puede hacer de otra forma utilizando punteros u otro método para simplificar al máximo el código?

Gracias.
Responder Con Cita