Форум: "Основная";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];
ВнизКто-нибудь занимался интерфейсами на Дельфи? Найти похожие ветки
← →
Владимир Васильев (2002-01-17 19:19) [21]Фрагмент фильтрует теги <В> и покозывает сам текст
Var
Doc : IHTMLDocument2;
All : IHTMLElementCollection;
Item : OleVariant;
Len,i : Integer;
S : String;
.....
Doc := WebBrowser1.Document as IHTMLDocument2;
while doc.readyState<>"complete"
do application.ProcessMessages;
All := Doc.All;
Len := All.Length;
for i := 0 to Len - 1 do
begin
Item := All.Item(i, varEmpty);
if Item.Tagname="B" then
begin
S:=Item.InnerText;// что там у меня такое "жирное" в тексте ?
end;
end;
Doc:=nil;
All:=nil;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c