[icWasya]

Сообщение от FlyInDream

А вот если так:

Код:

 f:= TStringList.Create();
 f.Text:= mmo1.Text;
 mmo1.Text := StringReplace(f.Text, 'null', '''null''', [rfReplaceAll, rfIgnoreCase]);

а лучше без стринглиста

Код:

 S:String;
 S:= mmo1.Text;
 mmo1.Text := StringReplace(S, 'null', '''null''', [rfReplaceAll, rfIgnoreCase]);