Abrindo um Formulario

Exitem duas maneiras que eu sei, talvez existam outras, mas as qeu eu adquiri conhecimento sao duas ...

uma abre varios formularios e a outra se nao fechar-mos uma nao tem como abrir outro formulario...

exemplo 1
procedure Tpr_agenda.ToolButton6Click(Sender: TObject);
begin
application.CreateForm(TConsu_agenda, Consu_agenda);
Consu_agenda.show;
end;


exemplo 2 - nao se consegue abrir outro form se ja estiver outro aberto

procedure Tprincipal.Menu1Click(Sender: TObject);
begin
Menu_geral := TMenu_geral.Create(nil);
Try
Menu_geral.Showmodal;
finally
freeandnil(Menu_geral);
end;
end;


Claro que os nomes dos arquivo deverao ser modificados de acordo com seus programas.

Agora o segundo exemplo tem algo a ver com liberaçao dos form da memoria ou nao??