Как я могу остановить мерцание TWebBrowser?

Question

Мой TWebBrowser мигает, когда его родитель изменяет размеры.

Я попробовал некоторые из упомянутых вещей ЗДЕСЬ , такие как DoubleBuffering, отключение FullRepaint, добавление этих процедур WMEnterSizeMove и WMExitSizeMove, но пока ничего не получалось.

EDIT: Также я пробовал ControlStyle := ControlStyle + [csOpaque]; и

procedure T<<yourclassorform>>.StopFlicker(var Msg: TWMEraseBkgnd);
begin
  Msg.Result := 1;
end;

Как минимизировать или остановить мерцание?

Answer 1

У меня была такая же проблема с мерцанием, и я обнаружил, что это был javaScript на странице, вызывающий мерцание. Javascript вызывал некоторые методы, которые занимали много времени, и поэтому страница мерцала.

В конце концов, переделка содержимого html-страницы (это был локально сгенерированный бит HTML, сгенерированный в приложении delphi) только дошла. Я исследовал вопрос замены TWebBrowser сначала на TEmbeddedWB с www.bsalsa.com и в итоге полностью отказался от встроенного Internet Explorer, и решил впредь использовать только Chrome Embedded Framework и его оболочку delphi, что в основном означает, что вы вы используете WebKit вместо IE.