Ver Mensaje Individual
  #5  
Antiguo 02-05-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.


Modal: (Estando en Auto-create forms)
Código Delphi [-]
implementation

uses Unit2; // unidad del form a llamar

procedure TForm1.btnLlamarOtroFormClick(Sender: TObject);
begin
  Form2.ShowModal;
end;

(Sin auto-create)
Código Delphi [-]
implementation

uses Unit2; // unidad del form a llamar

procedure TForm1.btnLlamarOtroFormClick(Sender: TObject);
begin
  with TForm2.Create(Self) do
  try
    ShowModal
  finally
    Free
  end
end;

No modal: (Estando en Auto-create forms)
Código Delphi [-]
implementation
uses Unit2; // unidad del form a llamar

procedure TForm1.btnLlamarOtroFormClick(Sender: TObject);
begin
  Form2.Show;
end;

No modal: (Sin auto-create)
Código Delphi [-]
implementation

uses Unit2; // unidad del form a llamar

procedure TForm1.btnLlamarOtroFormClick(Sender: TObject);
begin
  Form2:= TForm2.Create(Self);
  Form2.Show;
  // Liberar despues de usarlo (Form2.Free), hacerlo aquí lo cerraría
end;
Si mal no recuerdo en un capítulo de La cara oculta de Delphi 4 se trata la creación y destrucción de formularios SDI y MDI con detalle.

Saludos.

Edito: De echo el último modo que sugiere Dec es el que mayormente uso.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 02-05-2012 a las 23:03:03.
Responder Con Cita