Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2018-08-22 21:03:36 ЛС | профиль | цитата
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"
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Редактировалось 2 раз(а), последний 2018-08-22 22:14:38