Abrir a la vez el mismo form con diferentes datos

[[Lepe]]

Depende de la opción que estes usando:

- Si usas la opción de jachguate, usa el evento OnClose y añade

Código Delphi [-]
Action := cafree;

Solo queda el problema de que la variable Forma1 y/o Forma2 no apunta a nil, a ver si jachguate nos dice como identificarlo.

Con la solución que propuse yo:

Código Delphi [-]
Procedure  CloseWindow(const indice:integer);
begin
 if Assigned(ListaVentanas) and (ListaVentanas.Count >indice) then
 begin
    TForm2(ListaVentanas.items[indice]).Free;
    ListaVentanas.Delete(i);
    ListaVentanas.Pack;
end;
end;

[jachguate]

Buen día

Empezado por Lepe

Solo queda el problema de que la variable Forma1 y/o Forma2 no apunta a nil, a ver si jachguate nos dice como identificarlo.

Si os fijais en cómo está implementado, las variables Form1 y Form2 que usé son locales al procedimiento CrearFormas1, y jamás se chequea si estas son nil, puesto que no hace falta, ya que en cada llamada se asume que se crearán dos nuevos formularios...

Al final, lo que yo he puesto antes como ejemplo, es solo eso, un ejemplo, que da la idea y demuestra la capacidad de independencia entre dos instancias.

Por último, aclaro que en muchos casos no hace falta mantener una lista independiente de las ventanas creadas, en algunos si... siempre depende de la situación.

Hasta luego.