Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 23-12-2008
Avatar de RolphyReyes
RolphyReyes RolphyReyes is offline
Miembro
 
Registrado: ago 2004
Ubicación: Santo Domingo
Posts: 285
Poder: 20
RolphyReyes Va por buen camino
Smile Otra Alternativa

Saludos

Este código me funciona:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2 := TForm2.Create(Application);
  Self.Free;
  Form2.ShowModal;
end;

Como ves antes de mandar el Modal del Form2, libero el Form1, entonces cuando cierre el Form2 para cerrar la aplicación:
Código Delphi [-]
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Application.Terminate;
end;

Prueba y reporta....
__________________
Gracias,
Rolphy Reyes
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
mostrar resultados en form2 arespremium OOP 7 01-09-2007 21:25:46
Form1 Ultimo numero juanmaster SQL 5 01-09-2006 00:00:43
Mantener Form1 siempre detrás de Form2 Gorka Varios 1 13-10-2004 13:13:48
Form1 calambito Windows 4 23-04-2004 06:36:01
Urgente...error al querer mostrar form2 redlyon13 Varios 1 01-12-2003 15:32:12


La franja horaria es GMT +2. Ahora son las 04:12:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi