Свой текст в TWebBrowser

← →
Призрак (2002-10-22 18:50) [0]

Нужно сгенерить HTML-страничку и загнать в TWebBrowser. Нашел в инете код
var
v: Variant;
HTMLDocument: IHTMLDocument2;
begin
WB.Navigate("about:blank");
HTMLDocument := WB.Document as IHTMLDocument2;
v := VarArrayCreate([0, 0], varVariant);
v[0] := "<h1>Hello, world!</h1>";
HTMLDocument.Write(PSafeArray(TVarData(v).VArray));
HTMLDocument.Close;
end;
При исполнении кода возникает ошибка - чтение с адреса 00000000.
Может я тупица, но не могу понять, где я ошибаюсь и как заставить код работать.

← →
lipskiy (2002-10-22 23:46) [1]

Посмотри в UBPFD:
http://delphibase.endimus.com/?action=viewfunc&topic=netbrowse&id=10121
код похожий, но может чем поможет.

← →
Призрак (2002-10-23 11:55) [2]

Спасибо. Действительно, нужно было дождаться вывода пустой страницы.

Свой текст в TWebBrowser Найти похожие ветки