помогите пожалуйста исправить код.
а всё потому что при копировании текста, а потом последкующея его вставка удаляет из этого текста символ @LF
как сделать чтобы из строк текста не удалялся @LF ?
а всё потому что при копировании текста, а потом последкующея его вставка удаляет из этого текста символ @LF
как сделать чтобы из строк текста не удалялся @LF ?
Код:
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
$hGUI = GUICreate('', 200, 180)
GUICtrlCreateEdit('1' & @CRLF & '2' & @CRLF & '3' & @CRLF & '4' & @CRLF & '5' & @CRLF & '6' & @CRLF & _
'7' & @CRLF & '8' & @CRLF & '9' & @CRLF & '10', 10, 10, 20, 150, $ES_WANTRETURN)
$nEdit1 = GUICtrlCreateEdit('даные1' & @CRLF & 'даные2' & @CRLF & 'даные3' & @CRLF & 'даные4' & @CRLF & 'даные5' & @CRLF & 'даные6' & @CRLF & _
'даные7' & @CRLF & 'даные8' & @CRLF & 'даные9' & @CRLF & 'даные10', 30, 10, 70, 150, $ES_WANTRETURN)
$num1 = GUICtrlCreateEdit('4', 120, 10, 20, 20, $ES_WANTRETURN)
$num2 = GUICtrlCreateEdit('7', 170, 10, 20, 20, $ES_WANTRETURN)
GuiCtrlCreateLabel("c", 110, 15, 9, 15)
GuiCtrlCreateLabel("по", 155, 15, 13, 15)
$nButton1 = GUICtrlCreateButton('извлечь', 110, 30, 80, 20)
GUICtrlSetState(-1, $GUI_FOCUS)
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $nButton1
Local $new = ''
$list = StringSplit(GUICtrlRead($nEdit1),@LF)
for $i = GUICtrlRead($num1) to GUICtrlRead($num2)
$new &=$list[$i]
next
;MsgBox(0,0,$new)
GUICtrlSetData($nEdit1, '')
GUICtrlSetData($nEdit1, $new)
sleep(3000)
EndSwitch
WEnd