DLL封装的窗口问题：关闭dll窗口后，为什么MDI主窗口就最小化了?

Question

dll窗口输出函数：
function ShowDll_FYCFCX(A: TApplication): Bool;
var
  Form1: TfrmFYCFCX;
begin
    Application.Handle := A.Handle;
    Form1 := TfrmFYCFCX.Create(A);
    try
        Result := (Form1.ShowModal = mrOK);
    finally
        Form1.Free;
    end;
end;
菜单加载dll的代码：
procedure Tfrm_Main.N27Click(Sender: TObject);
var
  LibHandle: THandle;
  ShowForm: TShowForm;
begin
  LibHandle := LoadLibrary('Fxcfcx_dll.dll');
  try
    if LibHandle = HINSTANCE_ERROR then
      raise EDLLLoadError.Create('Unable to Load DLL');
    @ShowForm := GetProcAddress(LibHandle, 'ShowDll_FYCFCX');
    if not (@ShowForm = nil) then
      ShowForm(Application);
  finally
    FreeLibrary(LibHandle);
  end;
end;问题在哪呢？

Answer 1

我的窗体不是最小化，而是在DLL中的调用了APPLICATION的方法后主窗体最小化，当关闭DLL窗体
后主窗体又恢复了
不知该如何解决