[PS11011010]

А пробовал AnsiReplaceStr?

Код:

x:TStringList;

x.Text:=AnsiReplaceStr(x.Text,pansichar('Текст, который хочешь заменить'),pansichar('Новый текст'));