Cerrar MDI Childs aleatoriamente

[jcarlos.matrix]

haber si puedo ayudarte

1.-yo para cerrar una ventana mdi.
me voy al evento close de la forma y pongo esta linea de codigo para cerrarla "action:=cafree" y me funciona para cerrarla.

2.-para activarla pones la unidad de la forma en los uses y pones esta linea siguiente, que lo mas indicado seria crearla de esta manera
"Tform_mdiN.create(application);"

3.- para que no aparesca cuando entres en la unidad principal , vete a los menus de delphi como project->view source y borrar la liena que le corresponde a la unidad formcreate para que no la cree;

4.- ahora para cambiar datos o accesar a informacion de una mdi. lo que tienes que hacer
es para empezar sabemos que debes de mdiform y una mdichild correcto.

entonces los iguiente para accesar es .seria

(fForm_mdiformN.MDIChildren as Tform_mdichildN).label1.caption;
pero para esto deben de estar las unidades de la forma principal y de la que queeres accesar.

espero haberte ayudado en algo.
bye

[jcarlos.matrix]

correcion en punto 4
la linea donde dices (form.midicount nose que as Tformmidi).label1.caption:=dato;

es asi
corecfto bye

[[Lepe]]

A mi tambien me ha dejado un poco perplejo este hilo, ya que las preguntas son bastante escuetas.

en principio tienes la colección Forma_Mdi.MdiChildrens que puedes recorrerlo a placer y ver que ventanas estan creadas, a partir de ahí puedes hacer algo así:

Código Delphi [-]
if Forma_Mdi.MdiChildrens[i] is TfrmClientes then
begin
  Tfrmclientes(Forma_Mdi.MdiChildrens[i]).Lo que sea
end

Código Delphi [-]
function AlFrente(NombreVentana:string):Boolean;
var i:integer;
    hecho:Boolean;
beginÇ
  for i:=0 to MDI.count -1 do 
  if Tform(MDI.MdiChildren[i]).Name = NombreVentana then
  begin
   Tform(MDI.MdiChildren[i]).BringtoFront;
   result := true;
   break;
 end
 else
   result := false;

Es algo así lo que pides?

Un saludo