Cita:
|
Empezado por gontxalo
Hola Roman
|
No soy Roman, pero vamos a contestar... jejeje
Cita:
Lo he probado en uno nuevo y tampoco. Me hace lo mismo que te comentaba. Con la x del principal funciona y dando al botón del principal el no funciona y el si sólo cierra el segundo form quedando el principal abierto.
El code del botón de salir del principal es:
procedure TForm1.Button5Click(Sender: TObject);
begin
Form3.ShowModal;
end;
Gracias.
|
Aquí está tu problema... en el código del evento debes poner:
Código Delphi
[-]
procedure TForm1.Button5Click(Sender: TObject);
begin
Close
end;
El evento CloseQuery siempre se ejecuta al momento de mandar cerrar una ventana, así que lo que tenías antes ya debe funcionar bien...
Saludos...