Add(MainForm,2953706,21,112)
{
 Width=513
 Height=285
 BorderStyle=1
 Position=1
 Point(onClose)
 link(onCreate,7541278:doOpen,[])
 link(onClose,7541278:doClose,[])
}
Add(ComboBox,8730412,252,182)
{
 Left=75
 Top=5
 Width=305
 Height=21
 Text="Выбор сервера."
 Point(Data)
 link(onClick,12642516:doEvent1,[])
}
Add(Label,13039691,14,175)
{
 Left=5
 Top=5
 Width=65
 Height=70
 Caption="Сервер\r\n\r\nФайл\r\n\r\nСкришоты"
 AutoSize=1
 Alignment=1
}
Add(ComboBox,202778,441,196)
{
 Left=75
 Top=30
 Width=305
 Height=21
 Text="Выбор файла."
 Point(Data)
 link(onClick,10954420:doEvent1,[])
}
Add(FormatStr,12858237,350,196)
{
 Mask="SELECT name, id from files WHERE ser_id=%1;"
 link(onFString,1073998:doQuery,[])
 link(Str1,8730412:Data,[(356,180)(314,180)(314,222)(272,222)])
}
Add(Hub,12642516,322,189)
{
 link(onEvent1,202778:doClear,[(431,195)(431,209)])
 link(onEvent2,12858237:doString,[])
}
Add(FormatStr,10284540,525,210)
{
 Mask="SELECT name from ssh WHERE f_id=%1;"
 link(onFString,3894306:doQuery,[])
 link(Str1,14509082:Var3,[(531,194)(489,194)(489,236)])
}
Add(Hub,10954420,497,203)
{
 link(onEvent1,13597979:doClear,[(619,209)(619,223)])
 link(onEvent2,10284540:doString,[])
}
Add(ListBox,13597979,630,210)
{
 Left=75
 Top=55
 Width=100
 Height=165
 Hint="Выделите необходимые скриншоты."
 MultiSelect=0
 Point(SelectArray)
}
Add(GetDataEx,14509082,455,231)
{
 link(Data,202778:Data,[])
}
Add(Memo,2267509,658,266)
{
 Left=180
 Top=55
 Width=325
 Height=190
 ScrollBars=2
}
Add(MT_Enum,6230144,609,266)
{
 link(onItem,2267509:doAdd,[])
}
Add(Button,9862664,392,266)
{
 Left=90
 Top=225
 link(onClick,15318066:doString,[])
}
Add(SQLite_DB,7541278,77,126)
{
 FileName=":memory:"
 link(onOpen,5634017:doValue,[])
}
Add(SQLite_Query,2289830,252,126)
{
 SQL="SELECT CASE \r\n WHEN count()=0 THEN 0 ELSE 1 END \r\n FROM files;"
 link(onQuery,7278304:doEvent,[])
 link(dbHandle,1135469:Var2,[])
}
Add(SQLite_Exec,1636882,203,126)
{
 SQL="--Список серверов\r\nCREATE TABLE IF NOT EXISTS [servers](\r\n  [id] INTEGER PRIMARY KEY, -- 1\r\n  [name] TEXT);             -- forum.hiasm.com/rwerdsfsd\r\n----------------------------------------\r\n-- Список файлов \r\nCREATE TABLE IF NOT EXISTS [files](\r\n  [id] INTEGER PRIMARY KEY,-- 1\r\n  [name] TEXT,             --gfsdfsdf.mp4\r\n  [ser_id] INTEGER);       -- 1 id сервера на который выложен этот файл\r\n----------------------------------------\r\n--Список скриншотов\r\nCREATE TABLE IF NOT EXISTS [ssh](\r\n  [id] INTEGER PRIMARY KEY, -- 1\r\n  [name] TEXT,              -- gfsdfsdf1.jpg\r\n  [f_id] INTEGER);           -- 1 id файла к которому относится этот скриншот\r\n"
}
Add(SQLite_Exec,13479172,343,126)
{
 SQL="INSERT INTO [servers] VALUES(NULL,"forum.hiasm.com/rwerdsfsd");\r\nINSERT INTO [files] VALUES(NULL, "gfsdfsdf.mp4", 1);\r\nINSERT INTO [files] VALUES(NULL, "aaaaa.mp4", 1);\r\nINSERT INTO [ssh] VALUES(NULL,"gfsdfsdf1.jpg",1);\r\nINSERT INTO [ssh] VALUES(NULL,"gfsdfsdf2.jpg",1);\r\nINSERT INTO [ssh] VALUES(NULL,"gfsdfsdf3.jpg",1);\r\nINSERT INTO [ssh] VALUES(NULL,"gfsdfsdf4.jpg",1);\r\nINSERT INTO [ssh] VALUES(NULL,"gfsdfsdf5.jpg",1);\r\nINSERT INTO [ssh] VALUES(NULL,"sdf1.jpg",2);\r\nINSERT INTO [ssh] VALUES(NULL,"sdf2.jpg",2);\r\nINSERT INTO [ssh] VALUES(NULL,"sdf3.jpg",2);\r\nINSERT INTO [ssh] VALUES(NULL,"sdf4.jpg",2);\r\nINSERT INTO [ssh] VALUES(NULL,"sdf5.jpg",2);"
 link(dbHandle,8882193:Var2,[])
}
Add(IndexToChanel,7278304,294,126)
{
 link(onEvent1,13479172:doExec,[])
}
Add(GlobalVar,5634017,119,126)
{
 Name="dH"
 link(onValue,7484858:doEvent1,[])
}
Add(GetDataEx,1135469,252,110)
{
 Angle=3
 link(Data,5634017:Var,[(156,115)(156,152)(125,152)])
}
Add(Hub,7484858,168,126)
{
 OutCount=3
 link(onEvent1,1636882:doExec,[])
 link(onEvent2,2289830:doQuery,[(217,139)(217,132)])
 link(onEvent3,6226590:doQuery,[(192,146)(192,188)])
}
Add(SQLite_Query,3894306,574,210)
{
 link(onQuery,13597979:doAdd,[])
 link(dbHandle,13001970:Var3,[(580,115)])
}
Add(SQLite_Query,6226590,203,182)
{
 SQL="SELECT name, id from servers;"
 link(onQuery,8730412:doAdd,[])
 link(dbHandle,12555659:Var1,[(209,166)])
}
Add(SQLite_Query,1073998,392,196)
{
 link(onQuery,202778:doAdd,[])
 link(dbHandle,12555659:Var2,[])
}
Add(GetDataEx,8882193,343,110)
{
 Angle=3
 link(Data,1135469:Var3,[])
}
Add(GetDataEx,2872961,392,110)
{
 Angle=3
 link(Data,8882193:Var3,[])
}
Add(SQLite_Query,12640233,560,266)
{
 link(onQuery,6230144:doEnum,[])
 link(dbHandle,13001970:Var2,[])
}
Add(GetDataEx,13001970,560,110)
{
 Angle=3
 link(Data,2872961:Var3,[])
}
Add(FormatStr,15318066,448,266)
{
 Mask="SELECT "Имя сообщения", "Имя файла: "||name FROM files WHERE id=%2;\r\nSELECT "Скриншоты:";\r\nSELECT "http://"||"%1"||"/"||name FROM ssh WHERE f_id=%2;\r\nSELECT "1280x720 259 mp4 "||datetime('now'),"-----------------";"
 link(onFString,12640233:doQuery,[])
 link(Str1,8730412:String,[(454,254)(265,254)])
 link(Str2,14509082:Var2,[])
}
Add(GetDataEx,12555659,392,161)
{
 link(Data,2872961:Var2,[])
}