Hola rgstuamigo,
No tengo Delphi a mano, pero si no me falla la memoria, TApplication tiene una propiedad vectorial llamada Forms. Mediante esta se puede iterar y trabajar con los forms abiertos al momento:
Código Delphi
[-]Application.Forms[0]....;
Saludos,