Текущий архив: 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.054 c