Вниз
Скачать: CL | DM;

Не работает код из этой конференции!!!   Найти похожие ветки 

 
knyaz17   (2002-02-11 12:33) [0]

Господа, подскажите пожалуйста почему не работет нижеследующий код!
Doc получает адрес 0???

procedure TForm1.Button1Click(Sender: TObject);
var
Doc : Variant;
begin
WebBrouser1.Navigate("about:blank");
Doc := WebBrowser1.Document;
Doc.body.innerHTML := "Hello, Web";
// или так
Doc.write("<HTML><BODY>Hello, Web</BODY></HTML>");
end;


 
Лёша ©   (2002-02-11 15:55) [1]

Ты не предзагружаешь WebBro wser1, а предзагружаешь WebBro user1.


 
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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
14-69995
lipskiy
2002-03-11 00:59
2002.04.22
Какая трубка лучше?


3-69732
neos
2002-03-29 12:36
2002.04.22
Кнопка поля просмотра в TDBGrid


3-69698
Рамиль
2002-03-29 20:13
2002.04.22
Проблема открыть


1-69870
Aleksandr
2002-04-08 16:53
2002.04.22
Млин, это прикол MS ODBC или АДО-компоненты?


14-70024
Феликс
2002-03-17 16:10
2002.04.22
Можно ли из определенной папки выкачать все файлы с опр. расширением?




   Наверх