Из текстовой строки .txt получить в буфер обмена строку с переносами

[Soderling]

Здравствуйте!

Есть текстовый файл, там много строк. Переносы указаны так - \r\n или n\n\ или n\
пример: \n\nРАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!

Как сделать, что бы после выполнения функции было так:

РАЗРЕШЕНО
Общаться, задавать вопросы!
Отвечать и помогать друг другу советами!

Пробовал так и не сработало:

$sText= StringRegExpReplace("\n\nРАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!", "n\n\", @CRLF)

 

[Norm]

Попробуйте так

$sText= StringReplace("\n\n", @CRLF)

 

[Soderling]

Попробуйте так

$sText= StringReplace("\n\n", @CRLF)

Благодарю так работает

$sText = StringReplace("\n\nРАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!", "\n\n", @CRLF)

msgbox (64,'',$sText)

 

[IMStrelcov]

заменяет и \n и \r и \n\r и \r\n и \r\r и \n\n

$sText = '\n\nРАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!'
$sText = StringRegExpReplace($sText, '((\\n|\\r)+)', @CRLF)
ConsoleWrite($sText& @CRLF)

в массив:

$sText = '\n\nРАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!'
$aText = StringRegExp($sText, '(?:\\n|\\r)*(.+)', 3)
For $sLine In $aText
   ConsoleWrite($sLine& @CRLF)
Next

 

[SealAlbinos]

Если вам только разбить документ то да, подойдет и вариант просто с StringReplace, а если нужна будет работа с этим текстом, то лучше использовать уже массив, чтоб в дальнейшем снова не разбивать

#include <Array.au3>

$text = "РАЗРЕШЕНО\n\nОбщаться, задавать вопросы! \n\nОтвечать и помогать друг другу советами!"
$array = StringSplit($text, "\n\n",1)
_ArrayDelete($array, 0)
_ArrayDisplay($array)

 

[IMStrelcov]

то лучше использовать уже массив, чтоб в дальнейшем снова не разбивать

Пример выше.

 

[SealAlbinos]

Пример выше.

я рад что вы отредактировали свой пост и дополнили вариантом с массивом

 

[Andrey_A]

в массив:

Ваш пример с массивом не разбивает - в итоге только одна строка, а вот у SealAlbinos разбивает. Возможен и общий вариант:

$aText=StringSplit(StringRegExpReplace($sText,'((\\n|\\r)+)',@LF),@LF)

Или изменить регулярку для частного случая:

$aText=StringRegExp($sText,'(?:\\n|\\r)*([^\\]+)', 3)