[delphi-br] Pegar componentes em outro form

[Murilo Cunha]

Pessoal,

Pq esta estrutura nao dah certo?

procedure TForm3.btn1Click(Sender: TObject);
var
    frm_Form : TForm;
    i        : Integer;
begin
    if Form2 = nil then
       Form2 := TForm2.Create(Self);
    frm_Form := Form2;
    mmo1.Lines.Clear;
    for i := 0 to frm_Form.ComponentCount - 1 do
    begin
       mmo1.Lines.Add(frm_Form.Components[i].Name);
    end;
    FreeAndNil(frm_Form);
end;

Se fizer isso, o Form2 que é aberto antes deste form é fechado e minha 
aplicacao nao pode continuar.
Como contornar isso?

Obrigado
MuriloCunha