abrir y cerrar form2 desde form1

[ozsWizzard]

Empezado por pedrolazarus

Prueba esto, a mi me funciono, tambien funciona con destroy en ves de free, esto lo colocas en el boton del formulario 1 o donde desees. al cerrar el form2 simplemente se libera, espero no estar equivocado.

    with Tform2.Create(Application) do
    try
      Show;
    finally
      free;
    end;

Eso sería con Showmodal, no con show. Tal y como está ahí se abriría y cerraría el formulario de seguida.

[pedrolazarus]

NO, se abre el formulario y funciona correctamente, luego al tu cerrarlo se libera, yo lo probe, ¿Tu lo probaste?

[ecfisa]

Hola ozsWizzard.

Otra opción es usando un TTimer (pestaña System) en Form2.

Form1:

Código Delphi [-]
...
implementation

uses Unit2;

...

begin
  TForm2.ShowForm; 
end;    
...

Form2:

Código Delphi [-]
  
...
  TForm2 = class(TForm)
    Timer1: TTimer;
    procedure FormCreate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
  public
    class procedure ShowForm;
  end;              
...
implementation

procedure TForm2.FormCreate(Sender: TObject);
begin
  Timer1.Enabled  := False;
  Timer1.Interval := 2000;  // milisegundos
  Timer1.Enabled  := True;
end;

class procedure TForm2.ShowForm;
begin
  if not Assigned(Form2) then
    Form2 := TForm2.Create(nil);
  Form2.Show;  // o ShowModal
end;

procedure TForm2.Timer1Timer(Sender: TObject);
begin
  Close;
end;

procedure TForm2.FormDestroy(Sender: TObject);
begin
  Form2 := nil;
end;

Saludos.

[ozsWizzard]

Empezado por ecfisa

Hola ozsWizzard.

Yo no he preguntado nada pero gracias igualmente, jejeje

[ecfisa]

Empezado por ozsWizzard

Yo no he preguntado nada pero gracias igualmente, jejeje

Es cierto..., perdón por el despiste

Saludos.

[ozsWizzard]

Empezado por pedrolazarus

NO, se abre el formulario y funciona correctamente, luego al tu cerrarlo se libera, yo lo probe, ¿Tu lo probaste?

No me hacía falta probarlo para saber que tengo razón, aún así, lo he probado una vez más para comprobar que tengo yo razón.

El Show muestra el formulario y continua la ejecución, de toda la vida. El Showmodal es la instrucción que hasta que no "acabes" con el formulario mostrado, no devuelve la ejecución a donde se ha mostrado el formulario.

Ahora que lo he probado, a pesar de saber que tengo razón, pruébalo tú

[pedrolazarus]

Empezado por ozsWizzard

No me hacía falta probarlo para saber que tengo razón, aún así, lo he probado una vez más para comprobar que tengo yo razón.

El Show muestra el formulario y continua la ejecución, de toda la vida. El Showmodal es la instrucción que hasta que no "acabes" con el formulario mostrado, no devuelve la ejecución a donde se ha mostrado el formulario.

Ahora que lo he probado, a pesar de saber que tengo razón, pruébalo tú

si lo siento, lo tenia era en modal.

[aitorqrv]

Hola perdón por la demora pero he tenido problemas técnicos y vacaciones de por medio...

He seguido lo que habéis ido comentando a lo largo de este hilo, pero no consigo echarlo andar, no se si alguno de vosotros podría subir algún lado el codigofuente completo para poder analizarlo y compararlo con lo que yo estoy haciendo y ver cual es mi error o tomarlo como referencia.

Gracias, un saludo.

[ecfisa]

Empezado por aitorqrv

Hola perdón por la demora pero he tenido problemas técnicos y vacaciones de por medio...

He seguido lo que habéis ido comentando a lo largo de este hilo, pero no consigo echarlo andar, no se si alguno de vosotros podría subir algún lado el codigofuente completo para poder analizarlo y compararlo con lo que yo estoy haciendo y ver cual es mi error o tomarlo como referencia.

Gracias, un saludo.

Hola aitorqrv.


Saludos

[aitorqrv]

Muchas gracias por el fichero, lo acabo de compilar y probar y me funciona correctamente. Ahora lo tengo que analizar y ver donde esta mi error.

Un saludo.