[eus_deus]

Iska, хорошо. В принципе могу уже свистеть.
Строка

Код:

GUICtrlSetData($Edit2, $aS[5] & "#!#" & $aS[4] & "#!#" & $aS[2] & "#!#" & $aS[1])

содержит пробелы. Как от них избавиться в конечном результате? Кстати, если сильно надоедаю, то разрешаю меня послать)))) Я с autoit знаком три дня, хочу научится, а для этого надо решать задачу, к которой есть личный интерес, а не писать скрипты "Привет мир".
И касательно третьей строки... Посмотрел - надо все таки вытягивать с нее часть.
Вид у нее такой

Код:

my_icons.dll,101

Вот тот номер после запятой мне и нужен.В данном случае 101. Предполагаю, что нужна работа с регулярными выражениями. С связи с этим еще вопрос - у кого есть утилита regexp для работы с ними? А то с сайта ее скачать не могу - страница не открывается

[madmasles]

eus_deus,

Код:

$sString = 'строка с пробелами' & @TAB & ' и еще одна ' & @CR & @LF & 'и еще строка '
ConsoleWrite('До: >' & $sString & '<' & @LF)
$sString = StringStripWS($sString, 8)
ConsoleWrite('После: >' & $sString & '<' & @LF)
ConsoleWrite('---' & @LF)
$sString = 'Мне нужно только то, что после последней запятой, и до конца строки,123'
$sString = StringRegExpReplace($sString, '^.*,', '')
ConsoleWrite($sString & @LF)

[eus_deus]

madmasles, с числом и регуляркой - это точно мое. а вот с пробелами пока не понял, пошел смотреть внимательнее

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

Код:

Func _Convert()
$aS=StringSplit(GUICtrlRead($Edit1),@CRLF,1)
$sIco = StringRegExpReplace($aS[4], '^.*,', '')
$aResult=$aS[5]&"#!#"&$sIco&"#!#"&$aS[2]&"#!#"&$aS[3]
GUICtrlSetData($Edit2,"M " & $aResult)
EndFunc

работает как и ожидалось, но что делать, если строка $aS[3] пустая? Тогда функция мне пишет в конец строки символы #!#, которые там не нужны. Проблема в том, что строка может быть пустой, а может и нет. Какое то условие, если на конце строки стоит #!#, то удалять его нафиг?

[madmasles]

eus_deus,

Код:

Local $sString = '', $sDelim = '#!#'
For $i = 1 To 5
    $sString &= ' String ' & $i & ' ' & $sDelim
Next
ConsoleWrite($sString & @LF)

$sString = StringRegExpReplace($sString, $sDelim & '$', '')
ConsoleWrite($sString & @LF)
$sString = StringStripWS($sString, 8)
ConsoleWrite($sString & @LF)

Или

Код:

Local $sString = '', $sDelim = '#!#'
For $i = 1 To 5
    $sString &= ' String ' & $i & ' ' & $sDelim
Next
ConsoleWrite($sString & @LF)
$sString = StringRegExpReplace($sString, $sDelim & '$|\s+', '')
ConsoleWrite($sString & @LF)

[Iska]

Кстати, если сильно надоедаю, то разрешаю меня послать)))) »

С чего бы это ? Форум для того и создан, чтобы «надоедали», повышая квалификацию.

По остальному решение изложил коллега madmasles.

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

[eus_deus]

Iska, да, я уже пытаюсь вникнуть в коды коллеги madmasles'a. Правда, боюсь, пока они для меня слишком сложны, но я стараюсь понять))

[madmasles]

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

Давно уже так.

они для меня слишком сложны, но я стараюсь понять »

Если что-то непонятно, спрашивайте.

[eus_deus]

madmasles, ругается при работе на строку

Код:

 $sString &= $Result2 & $i & ' ' & $sDelim

знак & перед равенством пробовал удалять - без толку

Функция

Код:

Func _Convert()
$aS=StringSplit(GUICtrlRead($Edit1),@CRLF,1)
$sIco = StringRegExpReplace($aS[4], '^.*,', '')
$aResult=$aS[5]&"#!#"&$sIco&"#!#"&$aS[2]&"#!#"&$aS[3]
$aResult2=StringStripWS ( $aResult, 8 )
Local $sString = '', $sDelim = '#!#'
For $i = 1 To 5
 $sString = $Result2 & $i & ' ' & $sDelim
Next
ConsoleWrite($sString & @LF)
$sString = StringRegExpReplace($sString, $sDelim & '$|\s+', '')
ConsoleWrite($sString & @LF)
GUICtrlSetData($Edit2,"M " & $sString)
EndFunc

[Iska]

Давно уже так. »

Год-два? Разве это давно?!

[madmasles]

ругается при работе на строку »

У Вас нет переменной $Result2

Год-два? Разве это давно?! »

Для меня давно то, даты появления чего я уже не помню.