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

Вниз

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

 
cult ©   (2003-05-06 15:20) [0]

Добрый день

Позволяет ли какой-нить стандартный компонент вытащить из HTML голый текст, без разметки?

Спасибо.


 
Palladin ©   (2003-05-06 15:38) [1]

компонент

function HTMLtoText(var s:string):string;
var
i:integer;
IsTagClosed,
IsStringClosed:boolean;
begin
IsTagClosed:=true;
IsStringClosed:=true;
Result:="";
for i:=1 to length(s) do
case s[i] of
"<": if IsStringClosed then IsTagClosed:=false;
">": if IsStringClosed then IsTagClosed:=true;
""",#39: IsStringClosed:=not IsStringClosed
else if IsTagClosed then result:=result+s[i];
end;
end;


 
cult ©   (2003-05-06 15:40) [2]

а ведь это вариант! :))))

спасибо, щас реализуем... компонент :)



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

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

Наверх




Память: 0.46 MB
Время: 0.017 c
1-59686
ODINUS
2003-05-07 16:42
2003.05.19
Аccess


14-59887
Bargan
2003-04-28 20:28
2003.05.19
Куда делась панель компонентов FastNet в Delphi 7?


1-59733
SiJack
2003-05-06 08:30
2003.05.19
Как получить из делфи список всех листов в документе Excel ?


1-59687
ODINUS
2003-05-07 16:33
2003.05.19
Gif в Delphi 7


1-59785
Garmahis
2003-05-06 13:59
2003.05.19
Типизированный файл