Cerrar formularios pasado un tiempo

[[Caral]]

Hola
Pregunto:
Los usaras con el mouse ?.
Se podria hacer un procedimiento para que vea la posicion de raton, algo asi:

Código Delphi [-]
procedure TForm1.posicion;
 var
  pt:tpoint;
begin
 getcursorpos(pt);
 label1.Caption:= inttostr(pt.x)+'   '+inttostr(pt.y) ;
end;

Esto te dara la posicion x e Y del raton, con esto puedes saber si el raton esta encima del panel y cerrar los demas.
Saludos