Нашел сам способ =)
tagsU := WebBrowser1.OleObject.document.all.item(0).innerHT ML;
ShowMessage(tagsU);