Вверх ↑
Разработчик
Ответов: 26155
Рейтинг: 2127
#1: 2010-02-18 00:08:08 ЛС | профиль | цитата
Sova-Kmv, может вот так пойдет



Add(MainForm,11366362,161,126)
{
Width=380
Height=356
}
Add(DoData,10270666,315,245)
{
link(onEventData,9113597:doEvent1,[])
link(Data,2382690:Text,[])
}
Add(Button,5362479,161,175)
{
link(onClick,8986985:doEvent1,[])
}
Add(Edit,2382690,315,203)
{
Left=55
Width=315
Text="Строка-1"
}
Add(Memo,10952611,532,294)
{
Left=55
Top=60
Width=315
Height=265
ScrollBars=2
Point(onChar)
link(Str,12730185:Var2,[])
}
Add(DoData,2117444,315,329)
{
link(onEventData,9113597:doEvent2,[(363,335)(363,258)])
link(Data,5740590:Text,[])
}
Add(Edit,5740590,315,287)
{
Left=55
Top=20
Width=315
Text="Строка-3"
}
Add(DoData,7251448,315,420)
{
link(onEventData,9113597:doEvent3,[(363,426)(363,265)])
link(Data,16503857:Text,[])
}
Add(Edit,16503857,315,378)
{
Left=55
Top=40
Width=315
Text="Строка-2"
}
Add(StrList,2025813,476,203)
{
Strings=#0:|6:Привет|4:Васи|2:от|
Point(doGetString)
Point(onGetString)
link(onGetString,7864283:doStrCatDlm,[])
}
Add(DoData,9343465,273,245)
{
Data=Integer(1)
link(onEventData,10270666:doData,[])
}
Add(DoData,5235921,273,329)
{
Data=Integer(3)
link(onEventData,2117444:doData,[])
}
Add(DoData,1558745,273,420)
{
Data=Integer(2)
link(onEventData,7251448:doData,[])
}
Add(Hub,8986985,203,175)
{
OutCount=4
link(onEvent1,7864283:doClear,[(517,181)(517,223)])
link(onEvent2,9343465:doData,[(245,188)(245,251)])
link(onEvent3,5235921:doData,[(245,195)(245,335)])
link(onEvent4,1558745:doData,[(245,202)(245,426)])
}
Add(Hub,9113597,378,245)
{
InCount=3
OutCount=1
link(onEvent1,6430725:doSplit,[])
}
Add(Button,10233106,483,294)
{
Top=60
link(onClick,10952611:doAdd,[])
}
Add(GetDataEx,12730185,532,259)
{
link(Data,7864283:Result,[])
}
Add(StrPart,6430725,406,245)
{
Char="-"
link(onSplit,2025813:doGetString,[])
}
Add(StrCatDelim,7864283,532,210)
{
Delimiter=" "
Point(doClear)
link(Str1,12730185:Var1,[(538,198)(529,198)(529,264)])
}

карма: 22

0