Вверх ↑
Ответов: 16841
Рейтинг: 1232
#1: 2020-06-20 20:54:19 ЛС | профиль | цитата

Add(MainForm,2953706,21,105)
{
Width=513
Height=285
BorderStyle=1
Position=1
Point(onClose)
link(onCreate,11129859:doOpen,[])
link(onClose,11129859:doClose,[])
}
Add(DS_SQLite,11129859,70,119)
{
Name="db"
FileName=":memory:"
link(onOpen,11608800:doEvent1,[])
}
Add(DSC_Exec,9653181,147,119)
{
SQL="\r\n--Список серверов\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"
DSManager="db"
link(onExec,2029484:doQuery,[])
}
Add(DSC_Exec,6667028,287,119)
{
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);"
DSManager="db"
}
Add(DSC_Query,2029484,196,119)
{
SQL="SELECT CASE \r\n WHEN count()=0 THEN 0 ELSE 1 END \r\n FROM files;"
DSManager="db"
link(onQuery,14782519:doEvent,[])
}
Add(IndexToChanel,14782519,238,119)
{
link(onEvent1,6667028:doExec,[])
}
Add(DSC_Query,13049672,147,175)
{
SQL="SELECT name, id from servers;"
DSManager="db"
link(onQuery,8730412:doAdd,[])
}
Add(Hub,11608800,105,119)
{
link(onEvent1,9653181:doExec,[])
link(onEvent2,13049672:doQuery,[(137,132)(137,181)])
}
Add(ComboBox,8730412,196,175)
{
Left=75
Top=5
Width=305
Height=21
ReadOnly=0
Point(Data)
link(onClick,12642516:doEvent1,[])
}
Add(Label,13039691,14,168)
{
Left=5
Top=5
Width=65
Height=70
Caption="Сервер\r\n\r\nФайл\r\n\r\nСкришоты"
AutoSize=1
Alignment=1
}
Add(ComboBox,202778,385,189)
{
Left=75
Top=30
Width=305
Height=21
ReadOnly=0
Point(Data)
link(onClick,10954420:doEvent1,[])
}
Add(FormatStr,12858237,294,189)
{
Mask="SELECT name,id from files WHERE ser_id=%1;"
link(onFString,16694669:doQuery,[])
link(Str1,15503625:Var1,[(300,173)(258,173)])
}
Add(DSC_Query,16694669,336,189)
{
DSManager="db"
link(onQuery,202778:doAdd,[])
}
Add(Hub,12642516,266,182)
{
link(onEvent1,202778:doClear,[(375,188)(375,202)])
link(onEvent2,12858237:doString,[])
}
Add(FormatStr,10284540,469,203)
{
Mask="SELECT name from ssh WHERE f_id=%1;"
link(onFString,7600020:doQuery,[])
link(Str1,14509082:Var3,[(475,187)(433,187)(433,229)])
}
Add(DSC_Query,7600020,511,203)
{
DSManager="db"
link(onQuery,13597979:doAdd,[])
}
Add(Hub,10954420,441,196)
{
link(onEvent1,13597979:doClear,[(550,202)(550,216)])
link(onEvent2,10284540:doString,[])
}
Add(ListBox,13597979,574,203)
{
Left=75
Top=55
Width=100
Height=165
Hint="Выделите необходимые скриншоты."
MultiSelect=0
Point(SelectArray)
}
Add(FormatStr,1350943,336,322)
{
Mask="SELECT "Скриншот: "||"http://"||"%1"||"/"||name FROM ssh WHERE f_id=%2;"
link(onFString,15746344:doWork2,[])
link(Str1,8730412:String,[(342,313)(209,313)])
link(Str2,14509082:Var2,[(349,313)(377,313)(377,257)(405,257)])
}
Add(GetDataEx,14509082,399,224)
{
link(Data,202778:Data,[])
}
Add(Memo,2267509,497,266)
{
Left=180
Top=55
Width=325
Height=190
}
Add(MT_Enum,6230144,448,266)
{
link(onItem,2267509:doAdd,[])
}
Add(GetDataEx,15503625,252,210)
{
Angle=3
link(Data,8730412:Data,[(216,215)])
}
Add(DSC_Query,9127517,399,266)
{
DSManager="db"
link(onQuery,6230144:doEnum,[])
}
Add(FormatStr,5734271,336,266)
{
Mask="SELECT "Имя сообщения", "Имя файла: "||name FROM files WHERE id=%2;"
link(onFString,14361421:doWork2,[])
link(Str2,14509082:Var1,[(349,229)])
}
Add(Hub,10607192,294,266)
{
OutCount=3
link(onEvent1,5734271:doString,[])
link(onEvent2,1350943:doString,[(326,279)(326,328)])
link(onEvent3,10525835:doString,[(319,286)(319,363)])
}
Add(FormatStr,10525835,336,357)
{
Mask="SELECT "1280x720 259 mp4 "||strftime('%H:%M:%S', 'now');"
link(onFString,15746344:doWork3,[(389,363)])
}
Add(HubEx,14361421,385,266)
{
link(onEvent,9127517:doQuery,[])
}
Add(HubEx,15746344,385,322)
{
Angle=3
link(onEvent,14361421:doWork3,[])
}
Add(Button,9862664,224,266)
{
Left=90
Top=225
link(onClick,10607192:doEvent1,[])
}

карма: 24
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0