Gunnman писал(а):
(все записи в виде групп ААААА, BBBBB, ССССС и тд, отличие только в датах в группе)Если записи в группах идут в порядке возрастания дат, то тестовая схема :
Add(MainForm,2953706,21,105)
{
Width=417
Point(onClose)
link(onCreate,179590:doOpen,[])
link(onClose,179590:doClose,[])
}
Add(DS_SQLite,179590,98,119)
{
Name="db"
FileName=":memory:"
link(onOpen,11084183:doExec,[])
}
Add(DSC_Exec,11084183,154,119)
{
SQL="CREATE TABLE test(\r\n data TEXT,\r\n dat TEXT);\r\n \r\nINSERT INTO test values("AAAAAAAAA","2018-07-01");\r\nINSERT INTO test values("AAAAAAAAA","2018-07-20");\r\nINSERT INTO test values("BBBBBBBBB","2018-07-30");\r\nINSERT INTO test values("BBBBBBBBB","2018-07-28");\r\nINSERT INTO test values("NNNNNNNNN","2018-07-01");\r\nINSERT INTO test values("NNNNNNNNN","2018-07-19");"
DSManager="db"
link(onExec,819765:doQuery,[])
}
Add(StringTable,9262160,336,119)
{
Left=10
Top=25
Width=185
Height=200
Columns=#1:1|1:2|
Grid=0
}
Add(Button,14191584,147,238)
{
Left=160
Top=240
link(onClick,4921064:doEvent1,[])
}
Add(StringTable,103285,336,245)
{
Left=200
Top=25
Width=185
Height=200
Columns=#1:1|1:2|
Grid=0
}
Add(DSC_Query,819765,231,119)
{
SQL="SELECT * FROM test;"
DSManager="db"
link(onQuery,10840089:doStr,[])
}
Add(MT_String,10840089,280,119)
{
link(onResult,9262160:doAdd,[])
}
Add(DSC_Query,11604335,224,245)
{
SQL="SELECT * FROM test;"
DSManager="db"
link(onQuery,5281440:doStr,[])
}
Add(MT_String,5281440,280,245)
{
link(onResult,103285:doAdd,[])
}
Add(Hub,4921064,189,238)
{
link(onEvent1,14903288:doExec,[(217,244)(217,195)])
link(onEvent2,11604335:doQuery,[])
}
Add(DSC_Exec,14903288,231,189)
{
SQL="DELETE FROM test WHERE rowid NOT IN(SELECT rowid FROM test GROUP BY data);"
DSManager="db"
}