[madmasles]

eus_deus,
Можно примерно так.

Код:

_Convert();($Edit1)

Func _Convert();($n_CtrlID)
    Local $s_Read, $a_Split, $s_Ico, $s_Delim = '#!#', $s_NewString = 'M '

    ;$s_Read = GUICtrlRead($n_CtrlID)
    $s_Read = 'String 1' & @CRLF & 'String 2' & @CRLF & 'String 3' & @CRLF & 'String 4,12345' & @CRLF & 'String 5' & @CRLF & 'String 6'
    $a_Split = StringSplit($s_Read, @CRLF, 1)
    If $a_Split[0] < 5 Then Return
    $s_Ico = StringRegExpReplace($a_Split[4], '^.*,', '')
    $s_NewString &= StringRegExpReplace($a_Split[5] & $s_Delim & $s_Ico & $s_Delim & $a_Split[2] & $s_Delim & $a_Split[3], $s_Delim & '$|\s+', '')
    ConsoleWrite($s_NewString & @LF)
    ;GUICtrlSetData($n_CtrlID, $s_NewString)
EndFunc   ;==>_Convert