Contar os forms de uma aplicação

Ola a todos, vou passar uma informação e em cima desta dica perguntar algo, entao vamos la.

O codigo abaixo permite saber todos os forms abertos neste momento dentro da aplicacao.

for i := 0 to Application.ComponentCount -1 do
if (Application.Components[i] is TForm) Then
ShowMessage(TForm(Application.Components[i]).Name);

Caso queira saber os componentes de um determinado form basta trocar o Application pelo nome do form desejado e o TForm pelo componente desejado exemplo TEdit.

Agora vamos la, a pergunta é a seguinte, como eu consigo ter este recurso para processos em Thread, pois ja tentei substituir o TForm por TThread porem Thread nao é um componente e sim um processo.

Ai vai a pergunta alguem saberia resolver isto ou seja contar os processos abertos no projeto, saber tudo que foi criado em baixo da aplicação, agradeço a ajuda de todos.

ICheuk