TMSFNCWebBrowser get html Document as (Wide)String

i search a methode to get the html text (Body) from a page after load page.

Or Save html into a file or Stream after load page

You can use the following code:

uses
  JSON;

procedure TForm1.Button1Click(Sender: TObject);
begin
  TMSFNCWebBrowser1.ExecuteJavascript('function GetHTML(){return unescape(document.documentElement.innerHTML);} GetHTML();',
  procedure(const AValue: string)
  begin
    memo1.Lines.Text := TJSONObject.ParseJSONValue(AValue).Value;
  end
  );
end;

Thanks