Make(delphi)
ver(4.03 build 180)
Add(MainForm,2953706,7,21)
{
 Width=518
 Height=350
 Font=[Courier New,12,1,0,204]
 Caption="myAC Log Parser"
 DragForm=0
 Position=1
}
Add(FileSearch,12701374,196,105)
{
 Ext="*.log"
 FullName=1
 link(Dir,15551542:Text,[])
}
Add(Ini,14242193,287,35)
{
 FileName="settings.ini"
 Section="main"
 Key="LogPach="
 Type=1
}
Add(GVarContainer,6662879,21,245)
{
 Section="search"
 FilleName="settings.ini"
 VarList=#12:FileNotRead=|13:FileNotFound=|15:SuspiciousFile=|
 link(onLoad,15063075:doOpen,[])
 link(Section,15683344:Selected,[])
}
Add(Browse,13526288,119,42)
{
 Title="Укажите папку с логами myAC"
 NewDirButton=1
 link(onBrowse,15551542:doText,[])
}
Add(Edit,15551542,203,42)
{
 Left=5
 Top=25
 Width=195
 Height=25
 Text="Укажите путь до папки с логами"
 link(onChange,14242193:doWrite,[])
}
Add(Button,1229834,56,42)
{
 Left=205
 Top=25
 Height=25
 Caption="Выбрать"
 Data=String()
 link(onClick,13526288:doBrowse,[])
}
Add(Label,8827408,7,77)
{
 Left=5
 Top=60
 Width=299
 Height=25
 Font=[Courier New,10,1,0,204]
 Caption="теперь укажите тип поисковых данных"
}
Add(RadioButton,15683344,21,175)
{
 Left=10
 Top=100
 Width=95
 Caption="FILE_N_R"
}
Add(Button,10700695,126,105)
{
 Left=270
 Top=25
 Height=25
 Caption="Искать!"
 link(onClick,12701374:doSearch,[])
}
Add(FileStream,15063075,70,245)
{
 FileName="settings.ini"
 link(onLoad,1088421:doConvert,[])
}
Add(Convertor,1088421,119,245)
{
 Mode=11
 link(onResult,9080930:doSearch,[])
}
Add(BlockFind,9080930,168,245)
{
 ReplaceStr="FileNotRead=1"
 StartBlock="FileNotRead="
 EndBlock="0"
}
Add(GVarContainer,10440676,21,350)
{
 Section="search"
 FilleName="settings.ini"
 VarList=#12:FileNotRead=|13:FileNotFound=|15:SuspiciousFile=|
 link(onLoad,3505657:doOpen,[])
 link(Section,9443399:Selected,[])
}
Add(RadioButton,9443399,21,301)
{
 Left=10
 Top=125
 Width=80
 Caption="FILE_N_F"
}
Add(FileStream,3505657,70,350)
{
 FileName="settings.ini"
 link(onLoad,1635656:doConvert,[])
}
Add(Convertor,1635656,112,350)
{
 Mode=11
 link(onResult,13238260:doSearch,[])
}
Add(BlockFind,13238260,161,350)
{
 Delete=0
 ReplaceStr="FileNotFound=1"
 StartBlock="FileNotFound="
 EndBlock="0"
}
Add(GVarContainer,8934404,14,469)
{
 Section="search"
 FilleName="settings.ini"
 VarList=#12:FileNotRead=|13:FileNotFound=|15:SuspiciousFile=|
 link(onLoad,1623703:doOpen,[])
 link(Section,2253273:Selected,[])
}
Add(RadioButton,2253273,14,406)
{
 Left=10
 Top=150
 Width=65
 Caption="S_FILE"
}
Add(FileStream,1623703,70,469)
{
 FileName="settings.ini"
 link(onLoad,9808947:doConvert,[])
}
Add(Convertor,9808947,126,469)
{
 Mode=11
 link(onResult,3169714:doSearch,[])
}
Add(BlockFind,3169714,175,469)
{
 Delete=0
 ReplaceStr="SuspiciousFile=1"
 StartBlock="SuspiciousFile="
 EndBlock="0"
 Point(doEndBlock)
 Point(doStartBlock)
}