Der Code für sich genommen ist syntaktisch in Ordnung, aber die Rahmenbedingungen scheinen nicht zu stimmen. Setze mal eine Kontrollanzeige vor das Submit:
Delphi-Quellcode:
with WebBrowser1.Document as IHTMLDocument2 do
ShowMessage(body.parentElement.outerHTML);
Grüße vom marabu