Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.31;
Скачать: CL | DM;

Вниз

HTML в webbrowser   Найти похожие ветки 

 
Alexey Romanskiy   (2004-10-12 23:05) [0]

Есть такой стандартній компонент webbrowser, для отображения веб-страничек. Подскажите плиз, можно ли как-то получить html код открытой странички.


 
KilkennyCat ©   (2004-10-12 23:26) [1]

действительно, есть...
Так кинем же его на форму, и напишем в какой-нить процедуре WebBrowser1, и поставим после этого точку, и подождем мгновений чуть, и явится нам список свойств, и доступен для чтения и понимания он нам будет, раз уж F1 далеко очень находится...


 
Alexey Romanskiy   (2004-10-12 23:51) [2]


> KilkennyCat ©   (12.10.04 23:26) [1]


Блин, неужели сложно просто ответить.
Если, я сюда пишу, наверное ж я уже посмпотрел в хелпе и в немаленьком списке свойств. И не нашел ничего похожего на возможность отображения или сохранения HTML-кода.


 
Gero ©   (2004-10-12 23:56) [3]


> KilkennyCat ©   (12.10.04 23:26)

У него нет такого свойства.

> Alexey Romanskiy   (12.10.04 23:51)

Юзай TEmbeddedWB, рулезная вещь.


 
Alexey Romanskiy   (2004-10-13 00:05) [4]


> Gero ©   (12.10.04 23:56) [3]


> Юзай TEmbeddedWB, рулезная вещь.

спасибо. Судя по всему его скачивать надо, а то я его на вкладках найти не могу. Или как?


 
Тестировщица ©   (2004-10-13 00:08) [5]

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs,  OleCtrls, SHDocVw, ComCtrls, StdCtrls, ExtCtrls,MSHTML,ActiveX;
....

procedure TForm1.Button1Click(Sender: TObject);
begin
WEbBrowser1.Navigate("http://www.delphimaster.ru/cgi-bin/forum.pl?n=3");
end;

procedure TForm1.Button3Click(Sender: TObject);
var
 HTMLDocument: IHTMLDocument2;
 PersistFile: IPersistFile;
begin
 HTMLDocument := WebBrowser1.Document as IHTMLDocument2;
 PersistFile := HTMLDocument as IPersistFile;
 PersistFile.Save(StringToOleStr("test.htm"), True);
 Memo1.Lines.LoadFromFile("test.htm");

 while HTMLDocument.readyState <> "complete" do
   Application.ProcessMessages;

end;


 
Gero ©   (2004-10-13 00:13) [6]


> Alexey Romanskiy   (13.10.04 00:05)

Угу, скачай, не пожалеешь.
Это наследник TWebBrowser с наворотами.
http://www.euromind.com/iedelphi/embeddedwb.htm


 
Alexey Romanskiy   (2004-10-13 00:14) [7]


> Тестировщица ©   (13.10.04 00:08) [5]

Спасибо большое! Очень помогла!


 
KilkennyCat ©   (2004-10-13 00:19) [8]


> Gero ©   (12.10.04 23:56) [3]


Документ его свойство, Тестировщица же ответила.


> Alexey Romanskiy   (12.10.04 23:51) [2]
>
> > KilkennyCat ©   (12.10.04 23:26) [1]
>
>
> Блин, неужели сложно просто ответить.


наоборот. ответить просто гораздо легче. только бесполезно.


 
Gero ©   (2004-10-13 00:23) [9]


> Документ его свойство, Тестировщица же ответила.

Да. IDispatch. Очень полезную информацию можно из него извлечь.



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

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

Наверх




Память: 0.48 MB
Время: 0.04 c
4-1096027253
Yurko
2004-09-24 16:00
2004.10.31
Как показать Baloon НЕ возле TrayIcon ?


4-1096390666
hgd
2004-09-28 20:57
2004.10.31
Скажите как нажать кнопку в другой открытой программе


3-1096464925
Хома
2004-09-29 17:35
2004.10.31
Connect to Informix


6-1093326401
Ш-К
2004-08-24 09:46
2004.10.31
Мониторинг компьютеров


3-1096621509
msguns
2004-10-01 13:05
2004.10.31
MSACCESS. Ошибка синтаксиса