Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2018-08-25 14:00:39 ЛС | профиль | цитата
А так, если нужно фиксировать время внесения записи в БД


Add(MainForm,2953706,21,105)
{
Width=466
Point(onClose)
link(onCreate,10294138:doOpen,[])
link(onClose,10294138:doClose,[])
}
Add(DS_SQLite,10294138,70,119)
{
Name="mydb"
FileName=":memory:"
link(onOpen,8165484:doExec,[])
}
Add(DSC_Exec,8165484,112,119)
{
SQL="CREATE TABLE test(\r\nid INTEGER PRIMARY KEY,\r\nname TEXT,\r\nrDate REAL DEFAULT (julianday('now','localtime'))\r\n);"
DSManager="mydb"
}
Add(StringTable,8202161,336,168)
{
Left=5
Top=15
Width=435
Height=130
Columns=#2:id|3:Имя|4:Дата|5:Время|
}
Add(Edit,7249717,70,168)
{
Left=60
Top=180
Width=140
link(onEnter,3412309:doString,[])
}
Add(Label,16019537,161,119)
{
Left=20
Top=180
Width=26
Height=17
Caption="Имя"
}
Add(DSC_Query,16245721,238,182)
{
SQL="SELECT id, name, date(rDate), time(rDate) FROM test;"
DSManager="mydb"
link(onQuery,5885467:doStr,[])
}
Add(Hub,8895925,210,175)
{
link(onEvent1,8202161:doClear,[])
link(onEvent2,16245721:doQuery,[])
}
Add(FormatStr,3412309,112,175)
{
Mask="INSERT INTO test(name) values("%1");"
link(onFString,16146200:doExec,[])
}
Add(DSC_Exec,16146200,161,175)
{
DSManager="mydb"
link(onExec,8895925:doEvent1,[])
}
Add(MT_String,5885467,280,182)
{
link(onResult,8202161:doAdd,[(327,188)(327,174)])
}

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