Поиск / Исключение / Замена

← →
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;

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

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

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