function GetHtml(WebBrowser : TWebBrowser) : String;
begin
Result:=WebBrowser.OleObject.Document.documentElement.innerHTML;
end;

Dlaczego to mi nie działa gdy mam kontrolkę MozillaBrowser ?

function GetHtml(WebBrowser : TMozillaBrowser) : String;

Próbowałem tak, bo nazwę mam WebBrowser!

Dlaczego ?