Stack overflow in VCLWindowManager ShowWindow

[Former user]

procedure TWindowManager.ShowWindow(RootModel: IInterface; Context: TValue; Settings: IViewSettings) calls itself with same parameters:

begin ShowWindow(RootModel, Context, Settings); end;

Casting of RootModel to TObject must be added. The same bug in FMX version. Patch for both is attached.