AccessViolation exceptions with R196 about vcl-styles-utils HOT 10 CLOSED

Switching style manager off with TSysStyleManager.Enabled := False and the 
exceptions, when ending the app, are gone.

Reverting the last change in Vcl.Styles.Utils.SysControls.pas back (moving 
"end" from line 1077 to 1090) and the exceptions are gone.

I can't reproduce the issue, I just tested the sample application removing the 
TMS components (because I don't have these) and the App close normally. anyway 
can you make this change try changing this line in the 
Vcl.Styles.Utils.SysControls unit 

if nCode = HCBT_DESTROYWND then 

to  

 if (nCode = HCBT_DESTROYWND) and not (StyleServices.IsSystemStyle) then

Unfortunately the exceptions persist.
Commenting this one line removed the exception:

//FSysStyleHookList[wParam].Free;

Please check the last revision (197), and let me know the results. 

Still there, though reverting this change makes it go away:
  //FSysStyleHookList := TObjectDictionary<HWND, TSysStyleHook>.Create([doOwnsValues]);
  FSysStyleHookList := TObjectDictionary<HWND, TSysStyleHook>.Create;

Ok, we really need a sample App to reproduce the issue. ideally without third 
party components (or only with JEDI and JAM).

I sent you the demo app by PN today.

This issue was closed by revision r198.

Yeah! Exceptions are gone!