Cerrar formularios pasado un tiempo

[[ElDioni]]

Hola,

quería especificar que además de querer cerrar los paneles que estabamos comentando, que se encuentran dentro de un mismo form, también quiero cerrar otros formularios cuando pase un tiempo determinado sin usarse.

Saludos.

[ecfisa]

Hola ElDioni.

Te agrego otra idea derivando una clase de TPanel, por ahí te puede servir...

Saludos.

[[Caral]]

Hola
Quiero poner una queja formal.
Los codigos de mi amigo ecfisa me están dejando mal parado.
Asi no se vale.
Saludos
PD: Muy bueno amigo, muy bueno.

[[ElDioni]]

Hola ecfisa,

muchas gracias por el código, está cojonudo, voy a adaptarlo a mi programa para ver como queda y os cuento, pero en principio, con el vistazo que le he dado así por encima, creo que me va a servir para lo que pretendía.

Gracias de nuevo, y a ti también Caral gracias por tu tiempo.

Saludos.

[[ElDioni]]

Bueno, lo he estado probando y efectivamente me sirve y mucho, le he tenido que añadir el siguiente código porque sino no reiniciaba el contador del timer.

Código Delphi [-]
procedure TForm1.PanelEnter(Sender: TObject);
begin
  (Sender as TPanel).FTimer.Enabled:=false;
  (Sender as Tpanel).TimeToClose:= 10000;
  (Sender as TPanel).FTimer.Enabled:=true;
end;

Me faltaría poder cerrar el panel que tiene el foco si en realidad, aunque tenga el foco, no se está utilizando. Voy a ver si se me ocurre algo.

Saludos y gracias.