------------ Дoбавленo в 14.27:
Черт, забыл раскладку включить.
Add(MainForm,2953706,301,91)
{
Width=346
Height=262
Color=15780518
Caption="Telefon Nummer - Word"
Position=1
link(onCreate,2158467:doWork1,[(347,111)])
}
Add(Edit,763048,245,133)
{
Left=10
Top=15
Width=130
Text=""
}
Add(Button,14721864,-7,133)
{
Left=10
Top=45
Width=40
Height=30
Caption="1"
Data=String(1)
link(onClick,1549155:doWork2,[])
}
Add(Button,1469259,-7,167)
{
Left=55
Top=45
Width=40
Height=30
Caption="2"
Data=String(2)
link(onClick,10297375:doWork2,[])
}
Add(Button,6543197,-7,201)
{
Left=100
Top=45
Width=40
Height=30
Caption="3"
Data=String(3)
link(onClick,10290907:doWork2,[])
}
Add(Button,6002637,-7,235)
{
Left=10
Top=80
Width=40
Height=30
Caption="4"
Data=String(4)
link(onClick,2122024:doWork2,[])
}
Add(Button,11787873,-7,269)
{
Left=55
Top=80
Width=40
Height=30
Caption="5"
Data=String(5)
link(onClick,15134364:doWork2,[])
}
Add(Button,5793081,-7,303)
{
Left=100
Top=80
Width=40
Height=30
Caption="6"
Data=String(6)
link(onClick,4225530:doWork2,[])
}
Add(Button,5805361,-7,337)
{
Left=10
Top=115
Width=40
Height=30
Caption="7"
Data=String(7)
link(onClick,11656209:doWork2,[])
}
Add(Button,8542688,-7,371)
{
Left=55
Top=115
Width=40
Height=30
Caption="8"
Data=String(8)
link(onClick,9239830:doWork2,[])
}
Add(Button,8169839,-7,405)
{
Left=100
Top=115
Width=40
Height=30
Caption="9"
Data=String(9)
link(onClick,14763451:doWork2,[])
}
Add(Button,4333547,-7,439)
{
Left=10
Top=150
Width=40
Height=30
Caption="0"
Data=String(0)
link(onClick,14763451:doWork3,[(60,445)])
}
Add(Button,2345951,77,189)
{
Left=55
Top=150
Width=85
Height=30
Caption="генерация"
link(onClick,1435070:doEvent1,[])
}
Add(StrCat,10420271,140,133)
{
Point(doClear)
link(onStrCat,763048:doText,[])
link(Str1,10420271:Result,[(146,121)(184,121)(184,175)(146,175)])
}
Add(HubEx,1549155,56,133)
{
link(onEvent,10420271:doStrCat,[])
}
Add(HubEx,14763451,56,405)
{
Angle=3
link(onEvent,9239830:doWork3,[])
}
Add(HubEx,9239830,56,371)
{
Angle=3
link(onEvent,11656209:doWork3,[])
}
Add(HubEx,11656209,56,337)
{
Angle=3
link(onEvent,4225530:doWork3,[])
}
Add(HubEx,4225530,56,303)
{
Angle=3
link(onEvent,15134364:doWork3,[])
}
Add(HubEx,15134364,56,269)
{
Angle=3
link(onEvent,2122024:doWork3,[])
}
Add(HubEx,2122024,56,235)
{
Angle=3
link(onEvent,10290907:doWork3,[])
}
Add(HubEx,10290907,56,201)
{
Angle=3
link(onEvent,10297375:doWork3,[])
}
Add(HubEx,10297375,56,167)
{
Angle=3
link(onEvent,1549155:doWork3,[])
}
Add(Str_Enum,12590703,245,196)
{
Delimiter=""
link(onEnum,5124639:doRead,[])
link(onEndEnum,6128688:doEvent1,[(285,209)(285,272)])
link(String,763048:Text,[])
}
Add(ArrayRW,5124639,372,196)
{
link(onRead,11442855:doRandom,[])
link(Array,12556748:Var,[])
}
Add(Copy,13478362,490,196)
{
Count=1
link(onCopy,10952103:doAdd,[])
link(Str,5124639:Item,[(496,185)(424,185)(424,237)(378,237)])
link(Position,11442855:Random,[(503,176)(478,176)(478,237)(440,237)])
}
Add(Random,11442855,434,196)
{
Min=1
Max=4
link(onRandom,13478362:doCopy,[])
}
Add(Button,14548357,525,133)
{
Left=55
Top=185
Width=85
Height=30
Caption="очистить"
link(onClick,4421277:doEvent1,[])
}
Add(Str_Enum,273057,546,266)
{
Delimiter="r\n"
link(onEnum,10297637:doReplace,[])
link(String,10952103:Text,[])
}
Add(Hub,6128688,350,266)
{
link(onEvent1,273057:doEnum,[])
link(onEvent2,10952103:doClear,[(531,279)(531,209)])
}
Add(Replace,10297637,596,266)
{
SubStr="
"
link(onReplace,2607491:doAdd,[])
}
Add(Hub,4421277,574,133)
{
OutCount=4
link(onEvent1,6292392:doWork1,[(645,139)])
link(onEvent2,13627520:doWork1,[(732,146)])
link(onEvent3,2915417:In,[])
link(onEvent4,12679699:In,[])
}
Add(For,9642395,196,196)
{
End=10000
link(onEvent,12590703:doEnum,[])
link(onStop,12253003:doEvent1,[(238,209)(238,335)])
}
Add(LineBreak,3150227,203,140)
{
link(Out,763048:doText2,[])
Primary=[2915417,399,7]
}
Add(LineBreak,15742797,77,140)
{
link(Out,10420271:doClear,[])
Primary=[12679699,525,14]
}
Add(StrList,10952103,546,196)
{
}
Add(StrList,16095517,358,63)
{
Strings=#4:====|4:1111|4:AABC|4:DDEF|4:GGHI|4:JJKL|4:MMNO|4:PQRS|4:TTUV|4:WXYZ|
}
Add(StrList,4803058,407,63)
{
Strings=#4:====|4:1111|4:АБВГ|4:ДЕЖЗ|4:ИЙКЛ|4:МНОП|4:РСТУ|4:ФХЦЧ|4:ШЩЪЫ|4:ЬЭЮЯ|
}
Add(GetIndexData,12556748,372,133)
{
link(onIndex,11442855:doRandomize,[(415,139)(415,209)])
link(Data1,16095517:Array,[])
link(Data2,4803058:Array,[(385,121)(427,121)])
}
Add(CheckBox,12105158,301,133)
{
Left=10
Top=190
Width=40
Color=15780518
Caption="ru"
link(onCheck,2158467:doWork2,[])
}
Add(HubEx,2158467,343,133)
{
link(onEvent,12556748:doIndex,[])
}
Add(Hub,1435070,126,189)
{
link(onEvent1,14800346:In,[(147,195)(147,188)])
link(onEvent2,9642395:doFor,[])
}
Add(LineBreak,6044195,581,196)
{
link(Out,7001790:doEvent1,[])
Primary=[14800346,-427,-14]
}
Add(ArrayEnum,1106745,672,336)
{
link(onItem,6099512:doData,[])
link(Array,2607491:Array,[])
}
Add(ChangeMon,6099512,728,336)
{
link(onData,12641570:doAdd,[])
}
Add(ListBox,12641570,791,336)
{
Left=150
Top=10
Width=180
Height=210
Sort=0
}
Add(StrList,2607491,658,266)
{
Point(doSort)
}
Add(Hub,12253003,588,329)
{
link(onEvent1,2607491:doSort,[(630,335)(630,314)])
link(onEvent2,1106745:doEnum,[])
}
Add(HubEx,6292392,641,196)
{
Angle=1
link(onEvent,2607491:doClear,[(645,279)])
}
Add(Hub,7001790,623,196)
{
link(onEvent1,6292392:doWork2,[])
link(onEvent2,13627520:doWork2,[])
}
Add(HubEx,13627520,728,203)
{
link(onEvent,12641570:doClear,[(774,209)(774,349)])
}