Zoom the view of TEdgeBrowser

Question

What is the equivalent of the piece of code below for zooming with the new TEdgeBrowser delphi component? This is how I used the old TWebBrowser component.

procedure ApplyZoom(ZoomValue: Integer);
var
  pvaIn, pvaOut: OLEVariant;
begin
  pvaIn := ZoomValue;
  pvaOut := Null;

  WebBrowser.ControlInterface.ExecWB($0000003F, OLECMDEXECOPT_DONTPROMPTUSER, pvaIn, pvaOut);
end;