Замена символов в тексте

[Pasha_Sh]

У меня есть текст на веб страничке, когда я получаю его в memo, такая фигня, символы заменяются на какието другие сиволы.

Как всё это в тексте перевести на правильные сиволы?

[DomiNick]

Похоже на html-код...
link

[Pasha_Sh]

Это и есть html код, тока как этот код заменить в мемо на нормальные символы.

[Stilet]

По-моему где-то среди компонентов INDI есть дешифратор таких символов...

[Pasha_Sh]

мм, можно по подробнее

[MyIE]

напиши функцию по замене кодов на символ и все

[DomiNick]

Хм... Парсить текст... Там вроде они ещё и не обязательно должны оканчиваются на точку с запятой...

В моей ссылке написано же - "двухбайтовая кодировка Unicode"...
Поэтому предположу что "«" = "«" = "Label1.Caption:=#171;"... Только в компонентах VCL могут не все символы отображаться...

А вот мнемонические коды нужно искать полный их список...

текст на веб страничке, когда я получаю его в memo

А как вы это делаете? Может как-то по-другому просто можно?

[MyIE]

Что-то типа:

function parser(str: string): string;
begin
result:= StringReplace(str, '§', '§', [rfReplaceAll, rfIgnoreCase]);
end;

Справка по данной функции:

function StringReplace ( const SourceString, OldPattern, NewPattern : string; Flags : TReplaceFlags ) : string;

Функция StringReplace заменяет первое или все вхождения подстроки OldPattern в SourceString строкой NewPattern в соответствии с настройками Flags.

В качестве результата функции возвращается измененная строка. 

Переменная Flags может содержать ни одного, один или оба этих значения множества: 

rfReplaceAll : Заменяет все вхождения 
rfIgnoreCase : игнорирует регистр при поиске

[Pasha_Sh]

Может как-то по-другому просто можно?

По-другому нельзя.
Так как этот код заменить в мемо на нормальные символы.

[DomiNick]

Ну щас попробую придумать...
А всё-таки попробуйте как в этой теме: Текст HTML документа в Memo.