RegEx в Delphi для удаления возврата каретки и перевода строки в строке

Question

В javascript, я использую следующий код, чтобы убрать перевод строки и возврат каретки строки, и она хорошо работает:

var values="something....."
var sanit=values.replace(/(\r?\n|\r\n?)/g, "");

В Delphi я пытаюсь следующий код:

values="something....."
sanit:=TRegex.Replace(values,'/(\r?\n|\r\n?)/g', '');

Но это не работает.Замена не производится.

Answer 1

Вам не обязательно нужен RegEx для этой задачи. Это также можно сделать с помощью функции StringReplace:

StringReplace(value, sLineBreak, '', [rfReplaceAll])

или

StringReplace(StringReplace(value, sLineBreak, '', [rfReplaceAll]), #10#13, '', [rfReplaceAll])

для замены обеих комбинаций #10 (\n) и #13 (\r).

Константа sLineBreak находится в блоке System и объявляется как #13#10 (или в шестнадцатеричном формате: #$0D#$0A), если выбранной целевой платформой является Windows.