Application crashes when it is being closed

[silvioprog]

Hello,

To reproduce it, just:

• open the HTTPServer_Example.dproj, build/run and click "Start";
• close the application.

it will crash dumping the following stack log:

HTTPServer_frMain.TfrMain.UpdateControls
HTTPServer_frMain.TfrMain.BrookHTTPServer1Stop($3A47D90)
BrookHTTPServer.TBrookHTTPServer.DoClose
BrookHTTPServer.TBrookHTTPServer.SetActive(False)
BrookHTTPServer.TBrookHTTPServer.Close
BrookHTTPServer.TBrookHTTPServer.UnloadLibCb($3A47D90)
libsagui.SgLib.CallUnloadCbs
libsagui.SgLib.Unload
BrookLibraryLoader.TBrookLibraryLoader.Close
BrookLibraryLoader.TBrookLibraryLoader.Destroy
System.TObject.Free
System.Classes.TComponent.DestroyComponents
System.Classes.TComponent.Destroy
FMX.Types.TFmxObject.Destroy
FMX.Forms.TCommonCustomForm.Destroy
FMX.Forms.TCustomForm.Destroy
System.TObject.Free
System.Classes.TComponent.DestroyComponents
FMX.Forms.DoneApplication
System.SysUtils.DoExitProc
System._Halt0