ventana hija que no se cierra al pulsar la 'x'
 

No entiendo lo que me pasa, me explico, tengo una ventana padre(madre, o queráis llamarla) cuando abro una ventana hija para trabajar con ella y luego pulso la 'x' para cerrarla, lo que me hace es que la minimiza y no la cierra ¿alguien sabe a que es debido?

Hola Thoma.

Es el comportamiento normal de los forms MDIChild. En el evento OnClose del form MDIChild poné:

Código Delphi [-]
procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action:= caFree;
end;

Saludos.

Gracias ecfisa, poniendo lo que me dices me funciona, pero por defecto ¿no debería de cerrar la ventana?
lo único que había añadido era lo siguiente:

Código Delphi [-]
procedure TFrmParametros.FormClose(Sender: TObject; var Action: TCloseAction);
begin
     FrmParametros:=nil;
end;

Hola nuevamente.

No, el comportamiento por defecto de las ventanas MDI hijas es minimizarse. Para que puedas verificarlo, agregá esta línea al evento OnClose del form MDIChild:

Código Delphi [-]
uses TypInfo;

procedure TFrmParametros.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  ShowMessage(GetEnumName(TypeInfo(TCloseAction),Ord(Action))); 
end;

Saludos.

gracias por tu aclaración (me estoy volviendo un poco loco con el delphi, acostumbrado al cobol....)
me sale el siguiente error:
[DCC Error] FrParametros.pas(35): E2003 Undeclared identifier: 'GetEnumName'

Hola Thoma.

Fijate que en el codigo de arriba incluí:

Código Delphi [-]
uses TypInfo;

Es necesario que agregues esa unidad para usar las funciones GetEnumName y TypeInfo.

Un saludo.

Muchas gracias ecfisa, no me había percatado lo de la unidad.
un saludo.