2 menus en 1 aplicación distinto formulario

[Mathom]

Hola a todos, se me ha planteado una pequeña duda y no le encuentro la explicación....a ver si alguien sabe guiarme un poco. Resulta que tengo dos formularios uno principal (Form1) y otro que viene a ser un bloc de notas (Form2) al cual se accede mediante un menú sito en el primero.

En el segundo formulario pongo otro menu en el cual está archivo (nuevo, abrir y cerrar), edición (cortar, copiar y pegar) y ayuda.

El Form2 lo muestro a partir de un show. pero el form lo creo en tiempo de ejecución mediante el código...

procedure TForm1.Notas1Click(Sender: TObject);
Var
Form2 : TForm2;
begin
Form2 := TForm2.Create (Self);
Try
Form2.BorderStyle := BsDialog;
Form2.ShowModal;
Finally
Form2.Destroy;
End;

end;

No me marca ningún error de compilación pero el menú del 2º formulario no me aparece....alguna idea??

Además si muestro el Form2 con Show, el formulario aparece y desaparece..

Bien, espero haberme explicado con claridad.

Graciaaaas..

[luisgutierrezb]

si mal no recuerdo no te lo muestra por el borderstyle, ponle single...

la otra al darle show sigue con la siguiente instruccion y luego el destroy, para evitar eso quitale el destroy y en el evento onclose de la forma ponle:

Action := caFree;

[Caro]

Hola has la prueba con este codigo


Application.CreateForm(TForm2, Form2);
Try
Form2.ShowModal;
Finally
Form2.Destroy;
End;


Saludos

[Mathom]

gracias a los dos, voy a probarlo....ya os digo;)

[Mathom]

De maravilla.... tenía razón Luis Gutierrez...el menú ha salido al poner el formulario en Single y para destruir el formulario en el evento OnClose...

Action:= Cafree;

Gracias a los dos.
Un saludo