Help-me ExecWB(nil,nil,nil) - delphi.

[senha123]

Before the browser's normal Delphi was constantly going good, I downloaded the active x mozilla browser, to put zoom is bad, I tried:

MozillaBrowser1.OleObject.Document.Body.Style.Zoom := 0.25;

compiles, when I click nothing happens.

as soon:

var
Zoom: OLEVariant;
begin
Zoom:=0.25;
MozillaBrowser1.ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_PROMPTUSER, Zoom);

does not work, too many things are not working: @

source code:

MostrarCodigoFonte.CodigoFonteGet.lines.add(VarToStr(MozillaBrowser1.OleObject.Document.documentElement.innerHTML));

worked in the browser of Delphi, the unit code of mozilla code has only ExecWB,: @
Download it:

http://www.sendspace.com/file/24z1i9

is the unit normal, and another there too

thanks ;)