TWebBrowser теряет Parent при переключении вкладки у TTabControl

[Alexey Lovchikov]

Всем привет,

 

Появилась проблема при работе с TWebBrowser и TTabControl. 

 

Мое приложение состоит из TTabControl с несколькими TTabItem. На одном из табов размещен TWebBrowser который в дальнейшем должен будет отображать html станицу. Переключение между табами делаю через класс TChangeTabAction. Проблема появляется при переключении с любого таб на таб с TWebBrowser и обратно, браузер начинает перекрывать все контролы. Если телефон перевернуть то браузер исчезает. Если кто знает как можно обойти данную проблему подскажите. Может каким нибудь способом заставить перерисовываться окно  

 

Среда: Embarcadero® Delphi XE7 Version 21.0.17707.5020 

 

Во вложении пример программы

Primer.zip

[Alexey Lovchikov]

Решения не нашел, стал просто использовать переключение без анимации TChangeTabAction

Теперь переключение делаю так 

TTabControl.ActiveTab := ANextTab;

[StrangerMX]

Столкнулся с подобной проблемой. Жаль, что никто не нашел решения.