nesco писал(а):
Да, точно, есть такое. Чссзать -- черт его знает почему так выдает Без понятия. Я даже не понял, что это за кодировкаХиасм, вообще программирование - неисчерпаемы на загадки - получше шахмат - за что я их и люблю.. Есть над чем голову ломать)) В этом мире все просто - есть Бог, есть я, есть другие. (кстати, я смотрю на мир с т.зр. объектного прогр-я - все вокруг, даже красивые девушки - являются всего лишь объектами, с внешними и внутренними свойствами ) А в кодинге - сам черт ногу сломит..))
------------ Дoбавленo в 10.25:
Вот еще задачка всплыла - как заставить Replace заменять точное вхождение строки "строка", а не все подряд?
Add(Button,8557857,78,179)
{
Left=40
Top=150
Width=90
Caption="Replace"
link(onClick,15133467:doReplace,[(123,185)(123,132)])
}
Add(Memo,5266467,532,14)
{
Left=15
Top=5
Width=410
Height=125
Strings=#36:Как сделать точную замену подстроки?|49:Точная строка подлежащая замене (слово "строка").|63:Неточнаястрока,конкатенированная, которая не должна заменяться.|
}
Add(Replace,15133467,539,126)
{
SubStr="строка"
DestStr="замена"
link(onReplace,1084182:doWork3,[(578,132)])
link(Str,5266467:Text,[(545,117)(538,117)])
}
Add(Button,6865157,90,290)
{
Left=180
Top=150
Width=90
Caption="Reset"
link(onClick,10879748:doData,[(529,296)(529,272)])
}
Add(StrList,13772903,539,203)
{
Strings=#36:Как сделать точную замену подстроки?|49:Точная строка подлежащая замене (слово "строка").|63:Неточнаястрока,конкатенированная, которая не должна заменяться.|
}
Add(DoData,10879748,539,266)
{
link(onEventData,1084182:doWork1,[(585,272)(585,118)])
link(Data,13772903:Text,[])
}
Add(HubEx,1084182,574,112)
{
Angle=3
link(onEvent,5266467:doText,[(578,111)(522,111)(522,41)])
}
Чего-то стормозил - достаточно выполнить поиск строки с пробелом для решения данной задачи. Но все равно, неплохо добавить в компонент данный функционал поиска и замены точного вхождения подстроки в виде булевого свойства Точнаянеточная замена. Включаю в to do list, если никто раньше не сделает.
Add(Button,8557857,78,179)
{
Left=40
Top=150
Width=90
Caption="Replace"
link(onClick,15133467:doReplace,[(123,185)(123,132)])
}
Add(Memo,5266467,532,14)
{
Left=15
Top=5
Width=410
Height=125
Strings=#36:Как сделать точную замену подстроки?|49:Точная строка подлежащая замене (слово "строка").|63:Неточнаястрока,конкатенированная, которая не должна заменяться.|
}
Add(Replace,15133467,539,126)
{
SubStr=" строка"
DestStr=" замена"
link(onReplace,1084182:doWork3,[(578,132)])
link(Str,5266467:Text,[(545,117)(538,117)])
}
Add(Button,6865157,90,290)
{
Left=180
Top=150
Width=90
Caption="Reset"
link(onClick,10879748:doData,[(529,296)(529,272)])
}
Add(StrList,13772903,539,203)
{
Strings=#36:Как сделать точную замену подстроки?|49:Точная строка подлежащая замене (слово "строка").|63:Неточнаястрока,конкатенированная, которая не должна заменяться.|
}
Add(DoData,10879748,539,266)
{
link(onEventData,1084182:doWork1,[(585,272)(585,118)])
link(Data,13772903:Text,[])
}
Add(HubEx,1084182,574,112)
{
Angle=3
link(onEvent,5266467:doText,[(578,111)(522,111)(522,41)])
}