Форум: "Сети";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
ВнизНе работает код из этой конференции!!! Найти похожие ветки
← →
knyaz17 (2002-02-11 16:27) [2]Да, ну это я ошибся, но пример всё равно не работает, а работает следующий код:
procedure TForm1.Button1Click(Sender: TObject);
var
Doc : Variant;
begin
WebBrowser1.Navigate("about:blank");
while WebBrowser1.ReadyState< READYSTATE_INTERACTIVE do
Forms.Application.ProcessMessages;
Doc := WebBrowser1.Document;
Doc.body.innerHTML := "Hello, Web";
// или так
Doc.write("<HTML><BODY>Hello, Web</BODY></HTML>");
end;
Вот этот код работает!!!
Нашел в Королевстве - огромное спасибо!!!
А синтаксические ошибки у меня из-за того, что Delphi стоит на другом компе, чем Internet!!! Sorry!!!
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.008 c