Текущий архив: 2003.12.12;
Скачать: CL | DM;

Вниз

Использование WebBrowser   Найти похожие ветки 

← →
AAZ72   (2003-10-15 18:23) [0]

Добрый вечер. Какое свойство данного компонента нужно использовать для отображения, скажем, HTML-содержимого Memo?

Благодарю

---

← →
Ihor Osov'yak ©   (2003-10-16 01:09) [1]

... Какое свойство данного компонента нужно использовать для отображения, скажем, HTML-содержимого в Memo?

Если так, то можешь попытаться так (только не свойство это уже будет):

function SaveToString(const WebBrowser: IWebBrowser2): string;
var
S: TStringStream;
begin
result := "";
if not assigned(WebBrowser) then
exit;
if not assigned(WebBrowser.Document) then
exit;
S := TStringStream.Create("");
try
(WebBrowser.Document as IPersistStreamInit).Save(TStreamAdapter.Create(S), True);
Result := S.DataString;
finally
S.Free;
end;
end;

...

memo1.text := SaveToString(WebBrowser1.DefaultInterface);

---

Страницы: 1 вся ветка

Текущий архив: 2003.12.12;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.03 c