Stack call de formularios

[*Caro*]

Hola NicoDominguez, con Screen.Forms puedes recorrer los formularios que están abiertos, en el orden que han sido creados.

Código Delphi [-]
  for i:=0 to screen.FormCount-1 do 
    showmessage(screen.Forms[i].Name); //en screen.Forms[0] esta el ultimo creado

Saluditos

[NicoDominguez]

Empezado por Caro

Hola NicoDominguez, con Screen.Forms puedes recorrer los formularios que están abiertos, en el orden que han sido creados.

Código Delphi [-] for i:=0 to screen.FormCount-1 do showmessage(screen.Forms[i].Name); //en screen.Forms[0] esta el ultimo creado


Saluditos

Muchas Gracias !!

[NicoDominguez]

mmm hay un problema, eso me tira como 30 formularios, por mas que no esten abiertos.

yo necesito saber la cadena de invocacion solamente del form actual, es para registrar los llamados en un archivo de log.

[*Caro*]

Empezado por NicoDominguez

mmm hay un problema, eso me tira como 30 formularios, por mas que no esten abiertos.

Hola de nuevo, es porque todos tus formularios estan en autocreate (se estan creando automaticamente todos tus formularios aunque no los tengas abiertos (Project->Options)), yo te aconsejo que los quites de ahí y los crees manualmente, de esta forma solo estarán creados los que sean necesarios y no todos.

Código Delphi [-]
   Form2 := TForm2.Create(Self);
   ........................

Otra forma es que armes tu la cadena, creando tu formulario de la forma de arriba, puedes utilizar el Owner (propietario).

Código Delphi [-]
  Form2.CadenaInv := Self.Owner.Name;

Saluditos

[[newtron]]

Hola.

Independientemente de lo que te comenta Caro puedes saber si el formulario está visible o no con la propiedad showing con lo cual puedes chequear en la lista de formularios disponibles los que están abiertos.

Saludos

[NicoDominguez]

Muchas Gracias!!
Saludos