Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2014-11-06 13:44:57 ЛС | профиль | цитата
Gunnman, что не так?
Add(MainForm,2953706,56,105)
{
 Width=321
 Height=293
 link(onCreate,6400602:doOpen,[])
}
Add(DS_SQLite,6400602,105,119)
{
 Name="db"
 FileName="hhh.db"
 link(onOpen,6862751:doEvent1,[])
}
Add(DSC_Exec,5053667,217,119)
{
 SQL="create table test (file text);\r\ninsert into test values ('song.mp3');\r\ninsert into test values ('verybigexecutable.exe');\r\ninsert into test values ('simple.html');"
 DSManager="db"
}
Add(DSC_Query,4593301,217,224)
{
 SQL="select rtrim(rtrim(file,"htmlexemp3"),'.') from test;"
 DSManager="db"
 link(onQuery,16761449:doAdd,[])
 link(onError,10876226:doMessage,[])
}
Add(Memo,9943073,308,168)
{
 Left=5
 Top=5
 Width=140
 Height=245
}
Add(Message,10876226,259,238)
{
}
Add(Hub,6862751,154,119)
{
 OutCount=3
 link(onEvent1,5053667:doExec,[])
 link(onEvent2,8668742:doQuery,[(192,132)(192,174)])
 link(onEvent3,4593301:doQuery,[(184,139)(184,230)])
}
Add(DSC_Query,8668742,217,168)
{
 SQL="select file from test;"
 DSManager="db"
 link(onQuery,9943073:doAdd,[])
}
Add(Memo,16761449,308,224)
{
 Left=155
 Top=5
 Width=140
 Height=245
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0