Abstract Error al cerrar aplicación

[jymy788]

sorry por lo de las etiquetas, se me pasó por completo

Este es mi código en el onClose

Código Delphi [-]
procedure TFormMain.FormClose(Sender: TObject; var Action: TCloseAction);
var
 cont : integer;
begin
  for cont := (MDIChildCount - 1) downto 0 do
    MDIChildren[cont].Close;

  Action := CaFree;
end;

Había probado ya el FreeAndNil pero nada, me sigue fallando

De todas formas tengo un ejecutable (50k) que me he creado que me lo ejecuto al destruir la aplicación cuando cierro del todo el programa y con eso me evito las exepciones. Es una "chapuza" pero funciona y como urge....

De todas formas, una pregunta, como puedo obtener el PID del proceso "ejecutable.exe" de mi aplicación???

Un saludo

[roman]

Empezado por lepe

Destroy no se puede llamar, tienes que llamar a Free

Bueno, esto no es del todo correcto. Se recomienda usar Free en lugar de Destroy mas no es es una obligación. Free lo que hace es no fallar si el objeto es nil y como en este caso se verifica primero que no lo sea pues da un poco lo mismo.

// Saludos

[[Lepe]]

Se agradece la aclaración Roman


Lo que no acabo de comprender es por qué usas Application.Initalize dentro de un botón. Si ese botón está en la forma principal, entonces qué tienes en el .dpr ¿?

Un saludo