Make(delphi)
ver(4.03 build 181)
Add(MainForm,2953706,77,70)
{
 Width=852
 Height=523
 Caption="Procedures and Functions"
 BorderStyle=1
 WindowsState=2
 Position=1
 link(onCreate,3505166:doRead,[])
}
Add(ChildPanelEx,3505166,119,84)
{
 link(onCancel,2953706:doClose,[(159,90)(159,65)(68,65)(68,97)])
 link(onEventData,6996460:doAdd,[])
}
BEGIN_SDK
  Add(EditMultiEx,1179780,21,21)
  {
   WorkCount=#6:doRead|
   EventCount=#8:onCancel|11:onEventData|11:onEndSearch|
   Width=223
   Height=144
   link(doRead,11333866:doRead,[(34,27)(34,76)])
  }
  Add(Panel,6050213,49,119)
  {
   Width=846
   Height=43
   Align=2
  }
  Add(Browse,3622010,98,28)
  {
   link(onBrowse,14465321:doText,[(155,34)(155,69)])
   link(onCancel,1179780:onCancel,[(142,41)(142,27)])
  }
  Add(MultiElementEx,11721396,161,119)
  {
   link(onEventData,1179780:onEventData,[(215,125)(215,34)])
   link(onEndSearch,1179780:onEndSearch,[(224,132)(224,41)])
   link(Dir,14465321:Text,[])
  }
  BEGIN_SDK
    Add(EditMultiEx,7354412,21,21)
    {
     WorkCount=#8:doSearch|
     EventCount=#11:onEventData|11:onEndSearch|
     DataCount=#3:Dir|
     Width=322
     Height=95
     VOffset=40
     HOffset=40
     link(doSearch,16710282:doSearch,[])
    }
    Add(FileSearch,16710282,54,61)
    {
     Ext="*.pas"
     SubDir=1
     link(onSearch,4765365:doValue,[])
     link(onEndSearch,7354412:onEndSearch,[])
     link(Dir,7354412:Dir,[])
    }
    Add(FilePartElm,3019835,175,61)
    {
     link(onPart,13656763:doCompare,[])
    }
    Add(StrMask,13656763,224,61)
    {
     Mask="hi*"
     link(onFalse,9109612:doData,[])
    }
    Add(Memory,4765365,112,61)
    {
     link(onData,3019835:doPart,[])
    }
    Add(DoData,9109612,287,61)
    {
     link(onEventData,7354412:onEventData,[])
     link(Data,4765365:Value,[(293,49)(270,49)(270,103)(118,103)])
    }
  END_SDK
  Add(Edit,14465321,161,63)
  {
   Left=70
   Top=10
   Width=515
   Font=[MS Sans Serif,8,1,0,1]
   Text="G:\HiAsm\compiler\Delphi"
   link(onChange,11333866:doWrite,[(205,69)(205,106)(83,106)(83,83)])
  }
  Add(Button,7923267,49,28)
  {
   Left=10
   Top=10
   Font=[MS Sans Serif,8,1,0,1]
   Caption="Browse"
   link(onClick,3622010:doBrowse,[])
  }
  Add(Button,4117017,105,119)
  {
   Left=595
   Top=10
   Font=[MS Sans Serif,8,1,0,1]
   Caption="Start"
   link(onClick,11721396:doSearch,[])
  }
  Add(Registry,11333866,98,70)
  {
   HKey=1
   Key="Software\ProcFunc"
   Value="oldpath"
   link(onRead,14465321:doText2,[])
  }
END_SDK
Add(ListBox,6996460,182,91)
{
 Top=43
 Width=380
 Height=448
 Align=1
 Font=[MS Sans Serif,10,0,0,1]
 ModeSp=1
 DataType=1
 Point(String)
 link(onClick,12217101:doEvent1,[])
}
Add(MultiElementEx,10159877,308,105)
{
 @Hint=#38:Формирование списка процедур и функций|
 link(onEvent,2570861:doAddRow,[(348,111)(348,76)])
 link(onEnd,6919069:doColAction,[])
}
BEGIN_SDK
  Add(EditMultiEx,2738325,21,21)
  {
   WorkCount=#8:doEvent1|
   EventCount=#7:onEvent|5:onEnd|
   VarCount=#14:file=Имя файла|
   Width=475
   Height=228
   link(doEvent1,1069062:doEvent1,[(35,27)(35,111)])
   link(file,10448137:Part,[(27,197)(97,197)])
  }
  Add(StrList,9946370,126,49)
  {
  }
  Add(Hub,1069062,49,105)
  {
   OutCount=3
   link(onEvent1,9946370:doLoad,[(73,111)(73,83)])
   link(onEvent2,10448137:doPart,[])
   link(onEvent3,56190:doEnum,[(74,125)(74,160)])
  }
  Add(ArrayEnum,56190,140,154)
  {
   link(onItem,4475594:doCompare,[])
   link(onEndEnum,10505753:doEvent1,[])
   link(Array,9946370:Array,[])
  }
  Add(StrMask,4475594,259,154)
  {
   Mask="procedure*"
   link(onFalse,14341382:doCompare,[(301,160)(301,194)(247,194)(247,209)])
   link(onTrue,12856737:doWork1,[(327,167)])
  }
  Add(StrMask,14341382,259,203)
  {
   Mask="function*"
   link(onTrue,12856737:doWork3,[(327,216)])
  }
  Add(FilePartElm,10448137,91,112)
  {
   Point(Part)
   link(onPart,13873892:doEvent1,[])
  }
  Add(Hub,13873892,224,112)
  {
   OutCount=3
   link(onEvent1,2139293:doWork2,[])
   link(onEvent2,6142507:doWork2,[(247,125)(247,76)])
   link(onEvent3,2139293:doWork3,[(256,132)])
  }
  Add(DoData,11671631,266,112)
  {
   Data=String(==========)
   link(onEventData,6142507:doWork3,[(327,118)])
  }
  Add(HubEx,12856737,323,175)
  {
   link(onEvent,4070876:doValue,[(364,181)(364,125)])
  }
  Add(HubEx,2139293,252,112)
  {
   link(onEvent,11671631:doData,[])
  }
  Add(HubEx,6142507,323,70)
  {
   Angle=3
   link(onEvent,2738325:onEvent,[(327,27)])
  }
  Add(MT_AddData,3699871,392,175)
  {
   InputMT=3
   link(onAdd,6142507:doWork1,[(464,181)(464,76)])
   link(Data1,56190:Index,[(398,160)(265,160)(265,198)(153,198)])
   link(Data2,4070876:Value,[])
  }
  Add(Memory,4070876,399,119)
  {
   link(onData,3699871:doAdd,[(443,125)(443,153)(380,153)(380,181)])
  }
  Add(Hub,10505753,182,161)
  {
   link(onEvent1,9946370:doClear,[(211,167)(211,41)(114,41)(114,62)])
   link(onEvent2,2738325:onEnd,[(346,174)(346,34)])
  }
END_SDK
Add(StatusBar,813698,406,189)
{
 TextAlign=1
}
Add(Hub,12217101,273,98)
{
 OutCount=3
 link(onEvent1,9853531:doClear,[(325,104)(325,34)])
 link(onEvent2,10159877:doEvent1,[])
 link(onEvent3,7258046:doString,[(297,118)(297,195)])
}
Add(MultiElementEx,7258046,350,189)
{
 @Hint=#33:Формирование текста для StatusBar|
 link(Str1,14537765:Var3,[(356,155)])
 link(onFString,813698:doText,[])
 link(X1,2570861:Count,[])
}
BEGIN_SDK
  Add(EditMultiEx,7084726,21,21)
  {
   WorkCount=#8:doString|
   EventCount=#9:onFString|
   DataCount=#4:Str1|2:X1|
   Width=90
   Height=130
   link(doString,6451392:doString,[(35,27)(35,111)])
  }
  Add(MathParse,3774007,49,49)
  {
   MathStr="%1 -3"
   ResultType=0
   Point(reCalc)
   link(X1,7084726:X1,[(55,35)(34,35)])
  }
  Add(FormatStr,6451392,49,105)
  {
   Mask="В файле %1 процедур и функций %2"
   link(onFString,7084726:onFString,[(91,111)(91,27)])
   link(Str1,7084726:Str1,[(55,63)(27,63)])
   link(Str2,3774007:reCalc,[])
  }
END_SDK
Add(ChildFormEx,12375308,203,168)
{
 link(FullPathToFile,6996460:String,[])
 link(DataCaption,14537765:Var1,[(216,155)])
}
BEGIN_SDK
  Add(EditMultiEx,10871392,21,21)
  {
   WorkCount=#12:doNotVisible|9:doCaption|
   VarCount=#7:##count|
   DataCount=#14:FullPathToFile|21:DataCaption=Имя файла|
   Width=277
   VOffset=60
   HOffset=160
   Point(##count)
   link(doNotVisible,799731:doWork1,[(81,87)(81,87)])
   link(doCaption,12252687:doEvent1,[(39,94)(39,94)])
  }
  Add(MainForm,4582837,244,53)
  {
   Left=35
   Top=105
   Width=770
   Height=557
   Visible=1
   Position=1
   Point(doVisible)
  }
  Add(DoData,16290829,188,53)
  {
   link(onEventData,4582837:doCaption,[])
   link(Data,10871392:DataCaption,[])
  }
  Add(ChanelToIndex,799731,140,81)
  {
   link(onIndex,4582837:doVisible,[(231,87)(231,87)])
  }
  Add(Hub,12252687,56,88)
  {
   OutCount=4
   link(onEvent1,16290829:doData,[(93,94)(93,59)])
   link(onEvent2,5907564:doLoad,[(103,101)(103,167)])
   link(onEvent3,799731:doWork2,[(132,108)(132,94)])
   link(onEvent4,3370602:doSeparateMT,[(94,115)(94,181)])
  }
  Add(MT_MultiData,3370602,105,175)
  {
   link(onData1,5907564:doEnsureVisible,[])
  }
  Add(ListBox,5907564,168,133)
  {
   Width=762
   Height=523
   Align=5
   Point(doEnsureVisible)
   link(FileName,10871392:FullPathToFile,[(181,77)(187,77)])
  }
END_SDK
Add(GetDataEx,14537765,308,150)
{
 link(Data,10159877:file,[])
}
Add(MTStrTbl,9476235,70,175)
{
 @Color=16777137
 Left=380
 Top=43
 Width=466
 Height=448
 Align=5
 Name="tabl"
 Columns=#8:№ строки|17:Процедура\Функция|
 Grid=0
 link(onClick,6671904:doData,[])
}
Add(MST_Clear,9853531,357,28)
{
 @Color=16777102
 MSTControl="tabl"
}
Add(MST_DB,2570861,357,70)
{
 @Color=16777102
 MSTControl="tabl"
}
Add(DoData,6671904,140,175)
{
 link(onEventData,12375308:doCaption,[])
 link(Data,9476235:Select,[(146,163)(121,163)(121,221)(76,221)])
}
Add(MST_ColAction,6919069,406,112)
{
 @Color=16777137
 Action=9
 MaxColWidth=400
 Index=-1
 MSTControl="tabl"
}