Add(MainForm,4301602,-87,35)
{
 Width=543
 Height=403
 Caption="MP3  Info"
 WindowsState=2
}
Add(FilePart,10795269,109,105)
{
 NameWOExt=1
 link(onPath,10020164:doValue,[])
 link(onName,7314340:doValue,[])
}
Add(Memory,10020164,158,105)
{
}
Add(Memory,7314340,165,112)
{
}
Add(Hub,1112375,74,105)
{
 link(onEvent1,10795269:doPart,[])
 link(onEvent2,1062235:doWork,[(100,118)(100,167)])
}
Add(StringTable,3679155,242,161)
{
 Width=535
 Height=369
 Align=5
 Columns=#7:Имя=100|10:Размер=100|7:Тип=100|11:Изменен=100|17:Дата создания=100|10:Открыт=100|12:Атрибуты=100|13:Состояние=100|9:Title=100|10:Artist=100|14:Dimensions=100|12:Duration=100|9:Muxer=100|10:Codecs=100|12:Владелец=100|9:Автор=100|8:Тема=100|13:Категория=100|12:Страницы=100|15:Комментарий=100|19:Авторские права=100|15:Исполнитель=100|10:Альбом=100|7:Год=100|16:Номер записи=100|8:Жанр=100|18:Качество звука=100|10:Защита=100|17:Модель камеры=100|15:Дата снимка=100|6:31=100|6:32=100|18:Название серии=100|26:Описание телепрограммы=100|6:35=100|24:Размер аудио образца=100|25:Частота дискретизации=100|10:Каналы=100|
 Grid=0
 Point(onMouseDown)
 link(onMouseDown,1494592:doCompare,[])
}
Add(VBJScript,1062235,158,161)
{
 WorkPoints=#6:doWork|
 EventPoints=#6:onRead|
 DataPoints=#4:Path|8:FileName|
 Script=#24:Sub doWork (Data, Index)|0:|55:    Set objShellApp = CreateObject("Shell.Application")|51:    Set objFolder = objShellApp.NameSpace(sys.Path)|51:    Set objItem = objFolder.ParseName(sys.Filename)|0:|32:        strResult = vbNullString|64:        strResult =  objFolder.GetDetailsOf(objItem, 0) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 1) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 2) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 3) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 4) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 5) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 6) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 7) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 8) & ";" &_|51:        objFolder.GetDetailsOf(objItem, 9) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 10) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 11) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 12) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 13) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 14) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 15) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 16) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 17) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 18) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 19) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 20) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 21) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 22) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 23) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 24) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 25) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 26) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 27) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 28) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 29) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 30) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 31) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 32) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 33) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 34) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 35) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 36) & ";" &_|52:        objFolder.GetDetailsOf(objItem, 37) & ";" &_|43:        objFolder.GetDetailsOf(objItem, 38)|28:        sys.onRead strResult|0:|7:End Sub|
 UseName=0
 link(onRead,2365983:doEvent1,[])
 link(Path,10020164:Value,[])
 link(FileName,7314340:Value,[])
}
Add(If_else,1494592,291,168)
{
 Op2=Integer(1)
 link(onTrue,5002691:doPopupHere,[])
}
Add(PopupMenu,5002691,340,168)
{
 Menu=#21:Открыть каталог с MP3|
 link(onClick,5459411:doBrowse,[(383,174)(383,93)(-36,93)(-36,111)])
}
Add(Browse,5459411,-24,105)
{
 Title="Выбрать каталог с MP3"
 NewStyle=0
 NewDirButton=1
 link(onBrowse,709306:doSearch,[])
}
Add(FileSearch,709306,32,105)
{
 Ext="*.mp3"
 link(onSearch,1112375:doEvent1,[])
}
Add(Hub,2365983,207,161)
{
 link(onEvent1,3679155:doAdd,[])
 link(onEvent2,8550796:doProcessMessages,[(231,174)(231,118)])
}
Add(Application,8550796,242,112)
{
}