Make(delphi)
ver(4.04 build 184)
Add(MainForm,2953706,105,301)
{
 Width=490
 Height=311
 Caption="Анализатор sha-файлов."
 BorderStyle=1
 Position=1
}
Add(Button,14099037,105,105)
{
 @Color=16766164
 Left=5
 Top=10
 Width=65
 Height=21
 Font=[Tahoma,9,1,0,204]
 TabOrder=-1
 Caption="Browse"
 link(onClick,13151678:doEvent1,[])
}
Add(ODialog,2567534,189,105)
{
 Filter="Sha files|*.sha|"
 FileName=""
 link(onExecute,11123252:doText,[])
}
Add(SearchInFile,15719599,273,175)
{
 Text="Add"
 link(onSearch,822331:doSearch,[])
 link(FileName,11123252:Text,[])
}
Add(Edit,11123252,273,105)
{
 Left=80
 Top=10
 Width=315
 Color=15793151
 Font=[Tahoma,8,0,0,204]
 Text="WikiCenter.sha"
}
Add(BlockFind,822331,329,175)
{
 IncludeBlock=1
 StartBlock="Add("
 EndBlock=","
 link(onSearch,14057290:doAdd,[])
}
Add(Button,14824871,105,168)
{
 Left=405
 Top=10
 Width=60
 Font=[MS Sans Serif,10,1,0,1]
 Caption="START"
 link(onClick,13624330:doEvent1,[])
}
Add(StrList,14057290,399,175)
{
 Point(doSort)
}
Add(Hub,13624330,154,168)
{
 OutCount=3
 link(onEvent1,14729487:doEvent2,[(178,174)(178,153)])
 link(onEvent2,15719599:doSearch,[])
 link(onEvent3,6304753:doEvent1,[(261,188)(261,244)])
}
Add(Label,1511439,602,280)
{
 Left=425
 Top=110
 Width=4
 Height=4
 Font=[MS Sans Serif,10,1,255,1]
 Caption=""
 link(Text,16584244:Count,[])
}
Add(LineBreak,4973240,329,210)
{
 link(Out,14057290:doClear,[(379,216)(379,188)])
 Primary=[15006252,-112,-70]
}
Add(LineBreak,16126532,546,189)
{
 link(Out,2363622:doClear,[])
 Primary=[6698011,-301,-42]
}
Add(Hub,14729487,189,140)
{
 InCount=2
 OutCount=3
 link(onEvent1,15006252:In,[])
 link(onEvent2,6698011:In,[])
 link(onEvent3,15986747:In,[])
}
Add(Hub,13151678,154,105)
{
 link(onEvent1,2567534:doExecute,[])
 link(onEvent2,14729487:doEvent1,[(178,118)(178,146)])
}
Add(ArrayCountRepeats,5621610,413,287)
{
 link(onCount,14802531:doRowAction,[(457,293)(457,251)])
 link(onEndCount,596459:doEvent1,[])
 link(Array,14057290:Array,[])
}
Add(MTStrTbl,16584244,588,231)
{
 @Color=16777102
 Left=10
 Top=40
 Width=280
 Height=220
 Name="tab1"
 Columns=#13:Компонент=150|14:Количество=100|
 ColumnClick=1
 Grid=0
}
Add(MST_Clear,2363622,588,189)
{
 @Color=16777102
 MSTControl="tab1"
}
Add(MST_RowAction,14802531,469,245)
{
 @Color=16777102
 MSTControl="tab1"
}
Add(Label,10400234,406,238)
{
 Left=425
 Top=70
 Width=4
 Height=4
 Font=[MS Sans Serif,10,1,255,1]
 Caption=""
 link(Text,14057290:Count,[])
}
Add(Hub,6304753,350,238)
{
 link(onEvent1,12666405:doWork2,[])
 link(onEvent2,5621610:doCount,[(388,251)(388,293)])
}
Add(Label,5386247,399,105)
{
 Left=300
 Top=70
 Width=113
 Height=17
 Caption="Всего компонент :"
 AutoSize=1
 Alignment=1
}
Add(Label,4335163,329,105)
{
 Left=300
 Top=110
 Width=116
 Height=17
 Caption="Использовано типов :"
 AutoSize=1
 Alignment=1
}
Add(LineBreak,7490338,301,329)
{
 link(Out,9628771:doEvent1,[])
 Primary=[15986747,-84,-175]
}
Add(MST_SortInCol,11550460,553,294)
{
 @Color=16777102
 MethodSort=1
 MSTControl="tab1"
 Point(doSortDigit)
}
Add(Hub,596459,469,294)
{
 link(onEvent1,5902973:doWork2,[(492,300)(492,286)])
 link(onEvent2,9850931:doData,[])
}
Add(DoData,9850931,504,301)
{
 Data=Integer(1)
 link(onEventData,11550460:doSortDigit,[])
}
Add(HubEx,5902973,588,280)
{
 link(onEvent,1511439:doText,[])
}
Add(Hub,9628771,350,329)
{
 link(onEvent1,12666405:doWork3,[(396,335)])
 link(onEvent2,5902973:doWork3,[(592,342)])
}
Add(HubEx,12666405,392,238)
{
 link(onEvent,10400234:doText,[])
}