Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];




Вниз

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


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!!!




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.032 c
1-69931           snoup                 2002-04-09 19:19  2002.04.22  
Как скрыть/показать курсор мышки?


1-69895           DeMoN-777             2002-04-09 00:43  2002.04.22  
Проблема с текстовымми файлами


3-69673           AlexAlex              2002-03-28 18:08  2002.04.22  
Что делать при сообщении Directory is bisy


3-69668           Michael_Fehler        2002-04-03 12:20  2002.04.22  
ADOQuery


1-69810           VictorT               2002-04-09 17:47  2002.04.22  
Консольное приложение