Вверх ↑
Этот топик читают: Гость
Ответов: 150
Рейтинг: 0
#1: 2006-12-06 02:09:16 ЛС | профиль | цитата
Всем привет!

Как хорошо, что сайт снова заработал и есть у кого спросить! Помогите, пожалуйста, сделать так, чтобы в результате замены букв цифрами образовывался список строк, а потом выводился список чисел, образованных соединением номера строки и самого числа, которое образует строку, т.е. если в Списке строк в 1-ой (0-ой) строке число 6, то в результате выходило бы число 16, во 2-ой строке - число 1, то в результате выходило бы число 21 и т.д. У меня пример кода, когда просто образуется список строк. Как сделать так, чтобы в результате был список строк, состоящий из чисел, созданных из номера строки этого списка строк и самого числа строки?

code_693
карма: 0

0
файлы: 1code_693.txt [8.2KB] [399]
Ответов: 16884
Рейтинг: 1239
#2: 2006-12-06 08:50:48 ЛС | профиль | цитата
Можно так, но со всех Replace (которые в MultiElement) убрать "
"
code_694
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_694.txt [8.9KB] [1270]
Разработчик
Ответов: 26151
Рейтинг: 2127
#3: 2006-12-06 10:35:57 ЛС | профиль | цитата
Ntl-M, а вот это на базе массивов, как в прошлый раз -- гораздо проще редактировать. code_695
карма: 22

0
файлы: 1code_695.txt [2.1KB] [570]
Ответов: 16884
Рейтинг: 1239
#4: 2006-12-06 10:48:43 ЛС | профиль | цитата
Ntl-M, издание исправленое и дополненое


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1ntlm.rar [2.2KB] [403]
Разработчик
Ответов: 26151
Рейтинг: 2127
#5: 2006-12-06 10:54:11 ЛС | профиль | цитата
Tad, Мдааа... А где прогрессивный подход? Изначально метод преобразования символов в числа -- объемный и трудноредактируемый. Чему вас только Galkov учит. ИМХО (Прошу сильно не обижаться. А от Galkov'a, я и сам за подобные схемы "Мдааа..." получил).
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#6: 2006-12-06 11:28:01 ЛС | профиль | цитата
nesco, просто взял за основу схему Ntl-M

[size=-2]------ Добавлено в 11:28
Ntl-M, эта схема уже отправлена с русского компа, так что ошибок быть не должно
code_696
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_696.txt [16.4KB] [902]
Ответов: 8926
Рейтинг: 823
#7: 2006-12-06 12:57:13 ЛС | профиль | цитата
Ntl-M, мы тоже рады Вас видеть (слышать, читать)
code_698
карма: 19

0
файлы: 1code_698.txt [8.8KB] [1308]
Гость
Ответов: 17029
Рейтинг: 0
#8: 2006-12-08 00:32:58 правка | ЛС | профиль | цитата


Редактировалось 4 раз(а), последний 2021-05-21 07:53:21
карма: 0

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#9: 2006-12-08 00:51:21 ЛС | профиль | цитата
Ntl-M,
вот одна из реализаций (code_715). Я тут подробнее рассмотрел вариант и нашел ошибку. Вот так правильнее будет
Add(MainForm,13496259,133,154)
{
Left=20
Top=105
link(onCreate,9329573:doWork2,[(231,195)])
}
Add(Memo,4480073,231,140)
{
Left=100
Top=10
Width=120
Height=165
Strings=#3:123|4:4432|2:44|2:11|4:1256|4:5556|2:76|
}
Add(Button,14972513,133,238)
{
Left=100
Top=190
Width=155
Caption="Поиск наибольшего"
link(onClick,2033655:doEvent1,[])
}
Add(ArrayEnum,12074175,245,245)
{
link(onItem,6112200:doConvert,[])
link(onEndEnum,12345786:doData,[(387,258)(387,258)])
link(Array,4480073:Array,[])
}
Add(If_else,14305400,343,245)
{
Type=2
Op2=Integer(0)
link(onTrue,4320906:doValue,[(385,251)(385,230)(340,230)(340,188)])
link(Op2,4320906:Value,[])
}
Add(Memory,4320906,350,182)
{
Default=Integer(0)
link(onData,202281:doOperation,[])
}
Add(Math,202281,399,182)
{
Op2=1
link(onResult,8312934:doString,[])
link(Op1,12074175:Index,[(405,172)(286,172)(286,292)(258,292)])
}
Add(Label,14056088,623,252)
{
Left=100
Top=220
Width=155
}
Add(FormatStr,8312934,448,182)
{
Mask="№ строки с наибольшим -- %1"
link(onFString,7401327:doValue,[])
}
Add(Hub,2033655,189,238)
{
link(onEvent1,9329573:doWork3,[(235,244)])
link(onEvent2,12074175:doEnum,[(233,251)(233,251)])
}
Add(HubEx,9329573,231,182)
{
link(onEvent,4320906:doClear,[])
}
Add(Convertor,6112200,294,245)
{
Mode=1
link(onResult,14305400:doCompare,[])
}
Add(InfoTip,14099918,196,77)
{
Info=#32:при проверке можно редактировать|
Width=106
Height=116
}
Add(Memory,7401327,511,182)
{
}
Add(DoData,12345786,511,252)
{
link(onEventData,14056088:doText,[])
link(Data,7401327:Value,[])
}
Add(InfoTip,14989286,490,112)
{
Info=#19:фиксатор результата|
Width=78
Height=200
}
пример 715 -- неправильный, его не применяй (удалил бы, да немогу).

карма: 22

0
файлы: 1code_715.txt [1.1KB] [458]
Гость
Ответов: 17029
Рейтинг: 0
#10: 2006-12-08 01:39:48 правка | ЛС | профиль | цитата


Редактировалось 4 раз(а), последний 2021-05-21 07:53:21
карма: 0

0
10
Сообщение
...
Прикрепленные файлы
(файлы не залиты)