Cerrar formularios pasado un tiempo

[[ElDioni]]

Hola,

Tengo varios paneles dentro del form principal y varios formularios en una aplicación, el tema es que me gustaría que los paneles y los formularios que hacen referencia a un determinado tema no se puedan quedar abiertos si no se están utilizando durante un tiempo, pero no se si existe alguna forma de saber si alguien está utilizando un TPanel en concreto o un formulario en concreto para, una vez pasado el tiempo estipulado se cierren solo esos formularios y esos paneles y no toda la aplicación.

Espero que se entienda lo que quiero hacer y si no pues lo intento explicar otra vez.

Saludos.

[kapcomx]

de momento se me ocurre que en el evento onexit del panel actives un times con un intervalo que tu mismo puedes determinar. el la propiedad interval de este.

por ultimo programes en el ontimer del timer que se cierre el panel al cumplirse ese intervalo.

[[ElDioni]]

Hola,

creo que no me he explicado bien, yo tengo varios paneles, los utilizo como si fueran distintas pantallas pero dentro del mismo formulario, por medio de un statusbar me voy moviendo por todos los paneles que tenga visibles en ese momento, hay un panel que quiero ocultar si no se está utilizando pero no se como saber si se está utilizando un panel u otro a no ser que en cada uno de los componentes que tenga el panel que quiero ocultar le ponga un código para reiniciar un timer en el onmousemove, por ejemplo. Quería saber si existe otra forma menos tediosa de conseguir lo que quiero.

Saludos.

[[Caral]]

Hola
Por lo que entiendo tienes varios paneles.
Para que esten activos, osea en uso, tienen que estar visibles.
Si estan visibles pero no los quieres usar esperando cierto tiempo entonces los escondes.
Si es asi, aqui tienes un ejemplo sencillo.
Saludos

[[ElDioni]]

Hola Caral, gracias por tu tiempo.

He probado lo que me propones, he tenido que modificar la comprobación del tiempo cuando llega al que hemos establecido de la siguiente manera:

Código Delphi [-]
  If TimeToStr(Time) = TimeToStr(Tiempo) then
    begin
      TPanel(comp).Visible:= False;
    end;

Porque cuando hacía la comprobación no los consideraba iguales, de todas formas no es realmente lo que quiero, digamos que de los tres paneles que me has dibujado en tu ejemplo estoy utilizando el panel1, me muevo por él, pincho en él o en algún componente que contenga, pero el panel2 y el panel3 no los estoy utilizando, pasado el tiempo establecido quiero que se me cierren el panel2 y el panel3 pero no el 1 que si que lo estoy utilizando.

Espero que se entienda.

Saludos.

[[Caral]]

Hola
Usa el tag del panel.
Saludos