#include <GUIConstantsEx.au3>
#include <EditConstants.au3>

GUICreate("Выдели часть текста") ; Создаёт окно в центре экрана

$iEdit = GUICtrlCreateEdit("Строка 0", 10, 10)
GUICtrlCreateButton("OK", 140, 180, 70)

GUISetState()

For $n = 1 To 5
	GUICtrlSetData($iEdit, @CRLF & "Строка " & $n, 1)
Next

; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
Do
	$msg = GUIGetMsg()
	If $msg > 0 Then
		$a = GUICtrlRecvMsg($iEdit, $EM_GETSEL)
		If @error Then ContinueLoop
		GUICtrlSetState($iEdit, $GUI_FOCUS) ; Устанавливает фокус обратно в элемент Edit

		; Отображает возвращённые значения wParam и lParam элемента Edit
		MsgBox(4096, "Текущий выбор", StringFormat("начальный=%d конечный=%d", $a[0], $a[1]))
	EndIf
Until $msg = $GUI_EVENT_CLOSE