[Iska]

В результате - в текстовом поле цифра 4, неясно откуда взявшаяся. »

Очень даже ясно. Функция StringReplace:

Код: StringReplace ( "string", "searchstring/start", "replacestring" [, occurrence [, casesense]] ) Параметры: string Используемая строка. searchstring/start Строка поиска или позиция символа начала замены. replacestring Строка замены. …

А у Вас?! Что есть «$Edit2»?

Далее, eus_deus, почему Вы пишете — «первую строку», а делаете совсем другое — «StringReplace(…, "[Default]"&@CRLF, …»?!

Определитесь.

[Iska]

Замена первой строки может выглядеть, например, так (без проверки ввода):

читать дальше »

Код:

#NoTrayIcon

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Array.au3>

AutoItSetOption("MustDeclareVars", 1)

Local $Form1   = GUICreate("Form1", 306, 208, 192, 169)
Local $Edit1   = GUICtrlCreateEdit(StringFormat("One\r\nTwo\r\nThree\r\nFour\r\nFive\r\nSix\r\nSeven\r\nEight"), 8, 8, 169, 185)
Local $Button1 = GUICtrlCreateButton("Button1", 184, 8, 113, 33, $WS_GROUP)

Local $nMsg
Local $aValue

GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()

	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			$aValue = StringSplit(GUICtrlRead($Edit1), @CR, 2)
			$aValue[0] = InputBox("Переименовать секцию", "Введите имя секции", $aValue[0])
			GUICtrlSetData($Edit1, _ArrayToString($aValue, @CR))
	EndSwitch
WEnd

но мне не нравится Ваша реализация в целом.

[eus_deus]

мне не нравится Ваша реализация в целом »

Вы думаете, она мне нравиться? Я пытаюсь сделать, как мне надо имеющимися знаниями, которых по autoit у меня явно не хватает

А у Вас?! Что есть «$Edit2»? »

Описано в постановке

текстовое поле »

Очень даже ясно. Функция StringReplace: »

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

Замена первой строки может выглядеть, например, так (без проверки ввода): »

за код спасибо, но не пойдет - неизвестно количество строк

почему Вы пишете — «первую строку», а делаете совсем другое — «StringReplace(…, "[Default]"&@CRLF, …»?! »

Потому что "[Default]"&@CRLF - это реально первая моя строка

[eus_deus]

Всем спецам спасибо! Помощь в этом вопросе не нужна - пошел другим путем и нашел другую реализацию.

[Iska]

Описано в постановке »

Чёрта с два она «описана»! Вот потому-то надо приводить хотя бы минимально достаточный код.

[eus_deus]

Iska, если вам надо объяснять, что $EDIT2 - это текстовое поле с которым мне над оперировать, то я не знаю... А код функции, который я пробовал, приведен в первом сообщении. Ваша реализация с массивами - полный бред, вся реализация задачи умещается в три строки.

бы минимально достаточный код »

А минимальный по вашему - это весь, наверное?

[Iska]

Iska, если вам надо объяснять, »

eus_deus, не надо «объяснять». Надо приводить минимально достаточный код. Я не по-русски пишу?

Ваша реализация с массивами - полный бред, вся реализация задачи умещается в три строки. »

Не могу судить о том, чего не видел. Но судя по тому, что видел — говорим, что надо менять первую строку, а вместо этого делаем «StringReplace()», причём, делаем некорректно, на пояснения обижаемся — флаг Вам в руки, коллега.

[eus_deus]

Iska, это для того, чтобы видели вы, коллега, и у кого еще встанет подобная задача

Код:

Func _NameSection()
$S_len=_GUICtrlEdit_LineLength($Edit2,0)
_GUICtrlEdit_SetSel($Edit2, 0, $S_len)
$new_name=InputBox("Переименовать секцию","Введите имя секции","","",200,130)
If @error Then Return
_GUICtrlEdit_ReplaceSel($Edit2, '['&$new_name&']')
EndFunc

Замена первой строки в текстовом поле

[Iska]

eus_deus, вот так уже лучше.