Como liberar EmbeddedForm??

[RedVenom]

Cree una EmbeddedForm en un panel en una aplicación firemonkey pero ahora no se como liberarla, ya que caFree no funciona.

Alguien que me pueda decir como hacerlo???

Gracias.

[Neftali [Germán.Estévez]]

¿Puedes poner el código de cómo lo creaste?
No me acaba de quedar claro de qué estamos hablando...

[RedVenom]

Esto es lo que estoy haciendo:

Código Delphi [-]
unit UnidadPrincipal;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Rtti, System.Classes,
  System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Dialogs,
  FMX.StdCtrls, FMX.Objects, FMX.Ani;

type
  TFormPrincipal = class(TForm)
    PanelBts: TPanel;
    BtCorrespondencia: TSpeedButton;
    Label1: TLabel;
    Image1: TImage;
    Image2: TImage;
    PanelFormas: TPanel;
    procedure BtCorrespondenciaClick(Sender: TObject);
    procedure IncrustarForm(AParent:TControl; AForm:TCustomForm);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FormPrincipal: TFormPrincipal;

implementation

{$R *.fmx}
Uses UnidadCorrespondencia;

procedure TFormPrincipal.BtCorrespondenciaClick(Sender: TObject);
begin
  IncrustarForm(PanelFormas, Correspondencia.Create(Self));
end;

procedure TFormPrincipal.IncrustarForm(AParent:TControl; AForm:TCustomForm);
begin
  while AForm.ChildrenCount>0 do
    AForm.Children[0].Parent:=AParent;
end;

Pero me da un error a la hora de correr el procedimiento, me pone error Access Violation.

[RedVenom]

Aquí esta mi proyecto, no se que estaré haciendo mal.
Espero me puedan ayudar revisándolo.

[Neftali [Germán.Estévez]]

Creo que lo que estás haciendo ahí (si no entiendo mal) es "pasar" todos los componentes al nuevo Parent (pero no el form).
Pasándolos de nuevo al Parent original, debería bastar.

No lo he probado con FMX, pero con VCL, puedes "incluir" el form completo, no sólo los componentes.

Por otro lado, el proyecto que has enviado da error. ¿Seguro que es lo que estás utilizando?

[Neftali [Germán.Estévez]]

Vale. El error ya está corregido (faltaba una T en la creación del form).
Ahora lo que no me queda claro, es a qué te refieres con "liberarla".

¿Te refieres al form?