sys.addgroup("delphi","bass_asio","Media");

Add(MainForm,2953706,-85,119)
{
 Width=703
 Height=461
}
Add(Memo,5355834,468,322)
{
 Left=85
 Top=215
 Width=605
 Height=215
 ScrollBars=2
}
Add(Dir,11665480,13,70)
{
}
Add(FileSearch,5423037,6,119)
{
 Ext="*.ini"
 SubDir=1
 link(onSearch,13946336:doEvent1,[])
 link(onEndSearch,15765138:doEvent1,[(68,132)(68,174)])
 link(Dir,11665480:CurrentDir,[])
}
Add(Button,164418,-43,119)
{
 Left=20
 Top=25
 link(onClick,5423037:doSearch,[])
}
Add(StrCat,7517602,230,266)
{
 Str1="""
 link(onStrCat,13092949:doStrCat,[])
}
Add(StrCat,13092949,272,266)
{
 Str2="","
 link(onStrCat,16723616:doStrCat,[])
}
Add(Hub,13946336,97,119)
{
 link(onEvent1,15980723:doPart,[])
 link(onEvent2,12379411:doSearch,[(129,132)(129,272)])
}
Add(Memory,9791510,342,217)
{
}
Add(SearchInFile,12379411,146,266)
{
 Text="Info"
 link(onSearch,4526511:doSplit,[])
}
Add(StrPart,4526511,188,266)
{
 Char="="
 link(onSplit,7517602:doStrCat,[])
}
Add(Memo,2977100,461,168)
{
 Left=85
 Top=5
 Width=605
 Height=205
 ScrollBars=2
}
Add(StrCat,16723616,342,266)
{
 link(onStrCat,9791510:doValue,[(382,272)(382,257)(330,257)(330,223)])
 link(Str1,9791510:Value,[])
}
Add(StrCat,15052620,230,119)
{
 Str1="""
 link(onStrCat,9274981:doStrCat,[])
}
Add(StrCat,9274981,272,119)
{
 Str2="","
 link(onStrCat,9743580:doStrCat,[])
}
Add(Memory,13425157,335,70)
{
}
Add(StrCat,9743580,335,119)
{
 link(onStrCat,13425157:doValue,[(379,125)(379,111)(325,111)(325,76)])
 link(Str1,13425157:Value,[])
}
Add(Hub,15765138,97,168)
{
 link(onEvent1,3900570:doStrCat,[])
 link(onEvent2,2891537:doStrCat,[(123,181)(123,328)])
}
Add(FilePartElm,15980723,146,119)
{
 link(onPart,787259:doSplit,[])
}
Add(StrPart,787259,188,119)
{
 Char="."
 link(onPart,15052620:doStrCat,[(221,132)(221,125)])
}
Add(StrCat,3900570,328,168)
{
 Str1="arr3 = new Array("
 link(onStrCat,7754069:doTrim,[])
 link(Str2,9743580:Result,[])
}
Add(Trim,7754069,377,168)
{
 Char=","
 Mode=2
 link(onTrim,4091286:doStrCat,[])
}
Add(StrCat,4091286,419,168)
{
 Str2=");"
 link(onStrCat,2977100:doAdd,[])
}
Add(StrCat,2891537,335,322)
{
 Str1="arr5 = new Array("
 link(onStrCat,3480445:doTrim,[])
 link(Str2,16723616:Result,[])
}
Add(Trim,3480445,384,322)
{
 Char=","
 Mode=2
 link(onTrim,963243:doStrCat,[])
}
Add(StrCat,963243,426,322)
{
 Str2=");"
 link(onStrCat,5355834:doAdd,[])
}