Hola a todos.
Tengo el sig. caso.
en un DLL el procedimiento exportado
Código Delphi
[-]
procedure Showxxx; stdcall;
var
f: Txxx;
begin
f := Txxx.Create(nil); (FMX)
f.ShowModal(
procedure(ModalResult: TModalResult)
begin
end);
end;
exports
Showxxx;
end.
en Txxx
Código Delphi
[-]
procedure Txxx.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ModalResult := mrOk;
Action := TCloseAction.caFree;
end;
El codigo anterior funciona bien desde un exe (no dll)
Cuando cierro el form, en la barra de tareas de Windows se puede observar la vertana abierta (sin imagen). Y al liberar la dll se produce un error de "Access violation".
Estoy usando D10.3 y Firemonkey.