Вверх ↑
Этот топик читают: Гость
Ответов: 105
Рейтинг: -2
#1: 2013-03-13 20:38:15 ЛС | профиль | цитата
code_30569.txt
карма: 1

0
файлы: 1code_30569.txt [1.2KB] [88]
Гость
Ответов: 17029
Рейтинг: 0
#2: 2013-03-13 20:43:52 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-11 01:15:20
карма: 0

0
Ответов: 8930
Рейтинг: 823
#3: 2013-03-13 20:44:21 ЛС | профиль | цитата
jeezy1212, ну сколько можно!? Для работы со строками целый раздел в палитре, в т. ч. и компонент StrMask
карма: 19

0
Ответов: 105
Рейтинг: -2
#4: 2013-03-13 23:25:15 ЛС | профиль | цитата

37.45.75.63, спасибо
------------ Дoбавленo в 22.57:
а можно еще как-нибудь?
------------ Дoбавленo в 22.58:
просто там когда текст не совпадает,посылается пустое сообщение
------------ Дoбавленo в 23.25:
????
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#5: 2013-03-13 23:41:45 ЛС | профиль | цитата
jeezy1212 писал(а):
просто там когда текст не совпадает

code_30572.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_30572.txt [1.1KB] [81]
Ответов: 105
Рейтинг: -2
#6: 2013-03-13 23:54:54 ЛС | профиль | цитата
дададад спасбо!
------------ Дoбавленo в 23.54:
) а можно чтобы регистр не учитывался?
тоесть без разницы писать с большои буквы или с маленькои
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#7: 2013-03-14 00:03:37 ЛС | профиль | цитата
Можно. StrCase
------------ Дoбавленo в 00.03:
Да хоть вперемешку
Add(MainForm,4814681,147,217)
{
Width=362
Height=277
}
Add(Edit,5942762,98,273)
{
Left=15
Top=185
Width=320
Text=""
link(onEnter,10433193:doModify,[])
}
Add(ListBox,2765320,490,217)
{
Left=15
Top=10
Width=320
Height=170
}
Add(StrList,7518808,210,238)
{
Strings=#6:привет|9:как дела?|
Point(doGetIndex)
Point(onGetIndex)
link(onGetIndex,8984629:doGetString,[])
}
Add(StrList,8984629,259,203)
{
Strings=#8:привет))|7:хорошо)|0:|
Point(doGetString)
Point(onGetString)
Point(Index)
link(onGetString,7312517:doModify,[])
}
Add(If_else,12021763,371,210)
{
Op2=Integer(-1)
link(onTrue,14760334:doData,[])
link(onFalse,4307175:doWork2,[])
link(Op1,8984629:Index,[(377,198)(359,198)(359,267)(286,267)])
}
Add(DoData,14760334,427,210)
{
Data=String(А хрен его знает...)
link(onEventData,4307175:doWork1,[(480,216)])
}
Add(HubEx,4307175,476,217)
{
link(onEvent,2765320:doAdd,[])
}
Add(StrCase,10433193,147,280)
{
link(onModify,7518808:doGetIndex,[])
}
Add(StrCase,7312517,308,210)
{
Type=3
link(onModify,12021763:doCompare,[])
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 95
Рейтинг: 2
#8: 2013-03-14 10:52:58 ЛС | профиль | цитата
Поддержу Леонида, StrMask проще, если перехватывать надо небольшое число вариаций фраз
code_30573.txt
карма: 0

0
файлы: 1code_30573.txt [1019B] [85]
Ответов: 16884
Рейтинг: 1239
#9: 2013-03-14 12:16:06 ЛС | профиль | цитата
Abracadabra, нарисуй схемку хотя бы на 100 слов.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 95
Рейтинг: 2
#10: 2013-03-14 12:17:50 ЛС | профиль | цитата
Tad писал(а):
Abracadabra, нарисуй схемку хотя бы на 100 слов.

Abracadabra писал(а):
если перехватывать надо небольшое число вариаций фраз

карма: 0

0
Ответов: 16884
Рейтинг: 1239
#11: 2013-03-14 12:24:08 ЛС | профиль | цитата
100 слов, в сравнении с числом слов в русском языке, это не то, что "небольшое", а вообще мизерное.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 95
Рейтинг: 2
#12: 2013-03-14 12:27:43 ЛС | профиль | цитата
ну вот вариант для мизерного множества
Add(Edit,5942762,350,133)
{
Left=15
Top=185
Width=320
Text="пРиВеТ, чУвАк"
link(onEnter,5666480:doEnum,[(391,146)(391,109)(192,109)(192,195)])
}
Add(ListBox,2765320,483,189)
{
Left=15
Top=10
Width=320
Height=170
}
Add(DoData,16662602,434,189)
{
link(onEventData,2765320:doAdd,[])
link(Data,6598263:RemaindStr,[(440,180)(426,180)(426,229)(272,229)])
}
Add(StrList,13277001,203,126)
{
Strings=#16:привет*=привет))|17:как дела*=хорошо)|21:ты кто*=конь в пальто|6:*=х.з.|
}
Add(ArrayEnum,5666480,217,189)
{
link(onItem,6598263:doSplit,[])
link(Array,13277001:Array,[])
}
Add(StrMask,13340497,350,182)
{
Point(doMask)
link(onTrue,1968722:doEvent1,[])
link(Str,5942762:Text,[])
}
Add(Hub,5057401,315,189)
{
link(onEvent1,13340497:doMask,[])
link(onEvent2,13340497:doCompare,[(340,202)(340,188)])
}
Add(MultiStrData,6598263,266,189)
{
Char="="
Count=1
link(onPart1,5057401:doEvent1,[])
}
Add(Hub,1968722,392,189)
{
link(onEvent1,16662602:doData,[])
link(onEvent2,5666480:doStop,[(418,202)(418,243)(207,243)(207,202)])
}
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#13: 2013-03-14 15:09:53 ЛС | профиль | цитата
Твоё "Привет, чувак." написать Чувак, привет ! и получишь ответ Х.З.
Главное - точно определиться с алгоритмом, а путей решения - море.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 105
Рейтинг: -2
#14: 2013-03-14 20:47:27 ЛС | профиль | цитата
спасибо всем,а можно сделать например диалог?
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#15: 2013-03-14 21:39:52 ЛС | профиль | цитата
Можно. Для этого нужно быть асом не только в программировании, но и в морфологии (лингвистике).
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:Ex_
Сообщение
...
Прикрепленные файлы
(файлы не залиты)