Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
ВнизEasy Parse HTML Найти похожие ветки
← →
Opryshok (2004-01-19 15:07) [0]Здрасти всем.
Нужно парсать хтмл: получить <sometag> ЭТО </sometag> и <tag value=" ЭТО ">.
Может кто стыкался или видел чего нибудь такое в сети, подскажите.
Спасибо.
← →
Opryshok (2004-01-19 15:12) [1]Извините за спам. я не нарочно... (
← →
Erik (2004-01-19 15:16) [2]Скачай готовый парсер и в перед. Смотреть на Torry или через поисковик.
← →
Opuhshii (2004-01-19 16:25) [3]uses MSHTML
← →
Opryshok (2004-01-19 18:26) [4]2 Opuhshii.
Посмотрел, поискал по MSHTML... Разобраться трудновато. Может подкинь ссылку или экзампл....
← →
Opuhshii (2004-01-20 08:45) [5]http://podgoretsky.com/ftp/Docs/Delphi/Tenser/9/WebBrowser.doc
пример,..
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
var
I:Integer;
Count:Integer;
Collection:Variant;
Document:Variant;
begin
Document:=(pDisp as IWebBrowser2).Document;
Collection:=Document.all.tags("A");
Count:=Collection.length;
for I:=0 to Pred(Count) do
Memo1.Lines.Add(Collection.Item(I).href);
Collection:=Document.all.tags("IMG");
Count:=Collection.length;
for I:=0 to Pred(Count) do
Memo1.Lines.Add(Collection.Item(I).SRC);
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c