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

Вниз

Поиск / Исключение / Замена   Найти похожие ветки 

 
Long1   (2007-01-30 14:56) [0]

Есть такой текст, который содержит в себе html символы (не теги!), например: "hello i"m mike & my brother µmike"

И мне необходимо быстро и корректно заменить их на их не html эквиваленты. " => "; µ => µ, и т.д.

Проблема у меня кроется даже в их корректном поиске, т.е. не знаю как это грамотно осуществить, ибо требуется и учитывать то, что начало & может вовсе и не являться началом html-символа. Чем поможете?

 repeat
   j := 0;
   Inc(i2);
   Param := xHTML[i2];

   if (Param = "&") then
   begin
     uml := param;
     j := 0;
     j2 := i2;
   repeat
     Param := xHTML[j2];
     inc(j2);
     inc(j);
     uml := uml + param;
   until (j = 8) or (param = ";");

   if (param = ";") then
   begin
     ShowMessage("!!!" + uml);
   end else  ShowMessage(uml);
  end;
 until i2 >= Length(xHTML[i2])....;


 
Long1   (2007-01-30 14:58) [1]

&_quot;
&_micro;


это я для примера привел.


 
Vlad Oshin ©   (2007-01-30 15:24) [2]

это ?
http://delphimaster.net/view/2-1169640296/



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

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

Наверх




Память: 0.47 MB
Время: 0.027 c
2-1170018465
san1
2007-01-29 00:07
2007.02.18
real в integer


15-1169849835
esportsux
2007-01-27 01:17
2007.02.18
программа автоматизации работы к/к


15-1170099470
hmmm
2007-01-29 22:37
2007.02.18
помогите перевести фразу с eng.


15-1170106499
vasIzmax
2007-01-30 00:34
2007.02.18
"Достучаться до небес", саунд


15-1169657987
Rouse_
2007-01-24 19:59
2007.02.18
Мини ММП в пятницу