Вверх ↑
Ответов: 3349
Рейтинг: 233
#1: 2011-05-15 18:09:49 ЛС | профиль | цитата
code_23961.txt
------------ Дoбавленo в 18.06:
Просто так
------------ Дoбавленo в 18.09:
Add(MainForm,2953706,336,364)
{
BorderStyle=3
Position=1
link(onCreate,15053634:doRandomize,[(380,384)(380,342)])
}
Add(Button,12889080,245,322)
{
Left=5
Top=10
Width=115
Caption="Заполнить массив"
link(onClick,8973692:doEvent1,[])
}
Add(ListBox,14809461,469,329)
{
Left=130
Top=10
Width=260
Height=260
}
Add(Button,990649,413,434)
{
Left=5
Top=35
Width=115
Height=55
Caption="Сортировать и найти минимум и максимум"
link(onClick,8163180:doSort,[])
}
Add(Random,15053634,392,329)
{
Min=-100
Max=500
link(onRandom,14806759:doWork2,[])
}
Add(For,3168423,336,329)
{
End=9
link(onEvent,15053634:doRandom,[])
}
Add(Label,13541956,602,490)
{
Left=10
Top=100
Width=58
Height=17
Caption="Минимум: "
}
Add(Label,13820053,693,448)
{
Left=10
Top=125
Width=64
Height=17
Caption="Максимум: "
}
Add(Hub,8973692,287,322)
{
link(onEvent1,2716009:doWork2,[(323,328)(323,315)(235,315)(235,420)(428,420)(428,342)])
link(onEvent2,3168423:doFor,[])
}
Add(ArraySort,8163180,483,434)
{
ArrayType=2
link(onEndSort,6222988:doEvent1,[])
link(Array,10540688:Var2,[])
}
Add(ArrayEnum,4620704,567,441)
{
link(onItem,4960085:doEvent1,[])
link(onEndEnum,13010695:doRead,[(605,454)(605,485)(457,485)(457,496)])
link(Array,8163180:ArraySort,[(573,422)(558,422)(558,479)(489,479)])
}
Add(HubEx,14806759,448,329)
{
link(onEvent,14809461:doAdd,[])
}
Add(Hub,6222988,525,434)
{
link(onEvent1,2716009:doWork3,[(551,440)(551,392)(452,392)])
link(onEvent2,4620704:doEnum,[])
}
Add(HubEx,2716009,448,336)
{
link(onEvent,14809461:doClear,[])
}
Add(GetDataEx,10540688,483,406)
{
link(Data,14809461:Array,[])
}
Add(FormatStr,8780165,546,490)
{
Mask="Минимум: %1"
link(onFString,13541956:doText,[])
}
Add(ArrayRW,13010695,469,490)
{
Index=Integer(0)
link(onRead,8780165:doString,[])
link(Array,10540688:Var1,[(475,411)])
}
Add(FormatStr,2937173,637,448)
{
Mask="Максимум: %1"
link(onFString,13820053:doText,[])
}
Add(Hub,4960085,609,441)
{
link(onEvent1,14806759:doWork3,[(636,447)(636,317)(452,317)])
link(onEvent2,2937173:doString,[])
}


------------ Дoбавленo в 18.09:
Так лучше
карма: 1

0
файлы: 1code_23961.txt [2.5KB] [711]