Add(MainForm,5760284,483,301)
{
 Left=20
 Top=105
 Width=466
 Height=319
 Caption="Image Viewer"
 Position=1
 link(onCreate,10986703:doEvent1,[(517,321)(517,314)])
}
Add(Button,10902724,70,427)
{
 @Hint=#27:Запуск диалога выбора файла|
 Top=170
 Width=450
 Height=30
 Align=4
 Font=[MS Sans Serif,10,1,0,1]
 TabOrder=-1
 Caption="Добавить фото с цифрой в начале названия файла"
 link(onClick,5049552:doExecute,[])
}
Add(ODialog,5049552,119,427)
{
 Filter="Файлы рисунков( png )|*.png|Файлы рисунков( jpg )|*.jpg|Файлы рисунков( gif )|*.gif|Файлы рисунков( bmp )|*.bmp|All files|*.*|"
 FileName=""
 link(onExecute,9889022:doEvent1,[])
}
Add(AlphaImage,2282639,623,588)
{
 Width=450
 Height=170
 Align=5
}
Add(Img_Loader,2555054,574,588)
{
 link(onLoad,2282639:doLoad,[])
}
Add(Memo,15221221,336,427)
{
 Top=200
 Width=450
 Align=4
 ScrollBars=3
 Point(doLoad)
 Point(doSave)
 link(onChange,13533170:doEvent1,[])
}
Add(Timer,10725271,217,588)
{
 link(onTimer,3525988:doNext,[])
}
Add(ArrayRW,7391299,448,588)
{
 link(onRead,1534064:doEvent1,[])
 link(Array,15221221:Array,[(454,482)(356,482)])
}
Add(CounterEx,3525988,357,588)
{
 Point(doMax)
 link(onNext,7391299:doRead,[])
}
Add(DoData,6873056,301,602)
{
 link(onEventData,3525988:doMax,[(345,608)(345,601)])
 link(Data,15221221:Count,[(307,488)(349,488)])
}
Add(Hub,1534064,504,588)
{
 link(onEvent1,2555054:doLoad,[])
 link(onEvent2,5760284:doCaption,[(530,601)(530,454)(471,454)(471,307)])
}
Add(Hub,13533170,406,427)
{
 InCount=2
 link(onEvent1,6873056:doData,[(432,433)(432,521)(289,521)(289,608)])
 link(onEvent2,11743706:doEvent2,[(432,440)(432,458)(212,458)(212,475)])
}
Add(Hub,9889022,182,427)
{
 link(onEvent1,15221221:doAdd,[])
 link(onEvent2,11743706:doEvent1,[(210,440)(210,468)])
}
Add(DoData,2726866,273,462)
{
 link(onEventData,15221221:doSave,[])
 link(Data,324438:Value,[(279,348)(594,348)])
}
Add(Hub,11743706,224,462)
{
 InCount=2
 link(onEvent1,2726866:doData,[])
}
Add(InfoTip,14730098,224,189)
{
 Info=#48:Пришлось явно указать путь сохранения плейлиста,|61:тк после загрузок фоток он у меня оказывался в их директории,|34:а не в каталоге запуска программы.|59:Спасибо Неско, указавшему что причиной глюка Мемо были его |18:ефолтные значения.|
 Width=190
 Height=116
}
Add(Application,15921459,455,154)
{
}
Add(FilePartElm,1136495,455,203)
{
 Mode=0
 link(onPart,5538608:doStrCat,[])
 link(FileName,15921459:AppFileName,[])
}
Add(Hub,10986703,560,308)
{
 link(onEvent1,1136495:doPart,[(586,314)(586,262)(443,262)(443,209)])
}
Add(StrCat,5538608,511,203)
{
 Str2="paths.txt"
 link(onStrCat,324438:doValue,[])
}
Add(Memory,324438,588,203)
{
 link(onData,15221221:doLoad,[(632,209)(632,335)(324,335)(324,461)])
}