Add(HardDisk,274060,406,203)
{
Point(doEnum)
Point(onEnum)
link(onEnum,9121041:doSeparateMT,[])
}
Add(MT_MultiData,9121041,448,203)
{
link(onData1,490325:doValue,[(493,209)(493,167)])
link(onData2,15679240:doCompare,[])
}
Add(If_else,15679240,504,210)
{
Op2=Integer(3)
link(onTrue,5293532:doData,[])
}
Add(DoData,5293532,560,210)
{
link(onEventData,12774155:doStrCat,[])
link(Data,490325:Value,[])
}
Add(Memory,490325,560,161)
{
}
Add(FileSearch,10675856,658,210)
{
FullName=1
Point(onOtherFiles)
link(onSearch,13375573:doCompare,[])
link(onEndSearch,12686383:doMessage,[(709,223)(709,272)])
}
Add(StrCat,12774155,609,210)
{
Str2=":"
link(onStrCat,10675856:doSearch,[])
}
Add(Button,15698500,308,210)
{
Left=5
Top=5
Width=200
Caption="Ïîèñê"
link(onClick,1882904:doStart,[])
}
Add(Thread,1882904,357,210)
{
Delay=1
FastStop=0
link(onExec,274060:doEnum,[])
}
Add(Memo,13756095,952,231)
{
Left=5
Top=30
Width=200
Height=180
ScrollBars=2
}
Add(StatusBar,3925653,980,168)
{
SizeGrip=1
}
Add(MainForm,3425957,308,245)
{
Width=227
Height=276
Position=1
}
Add(Edit,11988503,658,252)
{
Left=100
Top=215
Width=105
link(Str,10675856:Count,[])
}
Add(Message,12686383,728,266)
{
}
Add(Label,926816,609,252)
{
Left=5
Top=216
Width=95
Height=17
Caption="Óäàëåíî ôàéëîâ :"
}
Add(StrMask,13375573,791,210)
{
Mask="*.exe*"
link(onFalse,11360809:doCompare,[(845,216)(845,174)])
link(onTrue,11615700:doWork2,[(870,223)(870,237)])
}
Add(StrMask,11360809,868,168)
{
Mask="*.dll*"
link(onFalse,3925653:doText,[])
link(onTrue,11615700:doWork1,[(921,181)])
}
Add(HubEx,11615700,917,224)
{
link(onEvent,13756095:doAdd,[])
}
Ответов: 1328
Рейтинг: 69
|
|||
[b]kernel[/b], вот так будет работать
|
|||
карма: 2 |
|