Вверх ↑
Ответов: 85
Рейтинг: 0
#1: 2018-12-11 07:14:10 ЛС | профиль | цитата
Tad, Вот опять меня в SQLite затянули . Я один проект сделал с использованием БД. Но для меня это было настоящим потрясением моей головы
Кстати,Tad, сом-порт в вашей конфигурации не работает, мне пришлось добавить Timer и DoDate. Не могу сделать запрос в SQLite на извлечение из базы данных для точек. Выдает синтаксическую ошибку. Ругается на характеристику REAL. Просьба указать на ошибку....

Add(MainForm,15663453,238,91)
{
Width=1224
Height=732
Color=15780518
Caption="Температура в помещении"
BorderStyle=1
ClientSize=0
Position=1
Point(onClose)
Point(Close)
link(onCreate,7098561:doEvent1,[])
link(Close,11914673:Left,[(244,79)(222,79)(222,221)(244,221)])
}
Add(Hub,7098561,287,105)
{
OutCount=4
link(onEvent1,7935657:doOpen,[])
link(onEvent2,4937493:doEnumPorts,[(315,118)(315,125)])
link(onEvent3,4404277:doTimer,[(313,125)(313,202)(233,202)(233,237)])
}
Add(DS_SQLite,7935657,532,105)
{
Name="rt"
FileName="C:\\Room_temperature.db"
link(onOpen,1699441:doExec,[])
}
Add(DSC_Exec,1699441,574,105)
{
SQL="CREATE Table1 IF NOT EXISTS data(\r\n data REAL,\r\n t REAL);\r\n \r\n\r\n "
DSManager="rt"
}
Add(Label,7480715,490,119)
{
Left=60
Top=14
Width=83
Height=42
Color=15780518
Font=[MS Sans Serif,8,1,16711680,1]
WinStyle=4
Caption="COM-порт №°\r\n\r\nСкорость"
AutoSize=1
}
Add(If_else,2513173,448,196)
{
Type=5
Op2=String()
link(onTrue,1696897:doSearch,[])
}
Add(ComboBox,7690426,448,119)
{
Left=125
Top=39
Width=75
Height=21
Color=15780518
Font=[MS Sans Serif,8,1,0,1]
WinStyle=4
Strings=#3:300|3:600|4:1200|4:2400|4:4800|4:9600|5:14400|5:19200|5:28800|5:38400|5:57600|6:115200|
Text="19200"
Point(EditText)
}
Add(ComboBox,8658105,385,119)
{
Left=150
Top=13
Width=50
Height=21
Color=15780518
Font=[MS Sans Serif,8,1,0,1]
WinStyle=4
Text=""
DataType=1
ReadOnly=0
DropDownCount=15
Point(EditText)
}
Add(Switch,7986566,329,175)
{
DataOn=String(255,СТОП)
DataOff=String(0,ПУСК)
Point(State)
Point(onOff)
Point(onOn)
link(onSwitch,11914673:doSplit,[(369,181)(369,169)(232,169)(232,181)])
link(onOff,6263210:doClose,[(380,188)(380,202)])
link(onOn,6263210:doOpen,[])
}
Add(COM,6263210,399,189)
{
BaudRate=15
link(onRead,2513173:doCompare,[])
link(Port,8658105:EditText,[])
link(BaudRate,7690426:EditText,[(412,177)(468,177)])
}
Add(EnumCOM,4937493,329,119)
{
OutType=0
link(onEnumPorts,8658105:doAdd,[])
}
Add(BlockFind,1696897,490,196)
{
IncludeBlock=1
StartBlock="T="
EndBlock="C"
link(onSearch,9240330:doData,[])
link(onEndSearch,15847114:doQuery,[(534,209)(534,328)])
}
Add(BitBtn,12852987,280,175)
{
Left=70
Top=66
Width=125
Color=0
Font=[MS Sans Serif,8,1,16777215,1]
Caption="Пуск"
Point(doColor)
link(onClick,7986566:doSwitch,[])
}
Add(StrPart,11914673,238,175)
{
Char=","
Point(Left)
link(onSplit,12852987:doCaption,[])
link(onPart,12852987:doColor,[])
}
Add(ChangeMon,9240330,539,196)
{
link(onData,11937578:doEvent1,[(579,202)(579,195)])
}
Add(DSC_Exec,6082265,665,189)
{
DSManager="rt"
link(onExec,6263210:doRXClear,[(709,195)(709,290)(373,290)(373,209)])
link(onError,15663453:doCaption,[(709,202)(709,150)(226,150)(226,97)])
}
Add(FormatStr,3396857,623,189)
{
Mask="INSERT INTO data values (julianday('now', 'localtime'), %1);"
link(onFString,6082265:doExec,[])
}
Add(PlotPoints,15672558,1092,455)
{
Grapher="Gamma"
Shape=2
}
Add(Plotter,12597280,1092,378)
{
Left=10
Top=100
Width=1200
Height=600
Name="Gamma"
GridX=24
GridY=25
MinH=-10
MaxH=40
MaxW=24
}
Add(PlotAxis,16137541,777,35)
{
Grapher="Gamma"
Name="ноль"
Color=16711680
}
Add(PlotAxis,4916857,833,35)
{
Grapher="Gamma"
Name="19"
Color=32768
Style=1
Y=19
}
Add(PlotAxis,5954945,889,35)
{
Grapher="Gamma"
Name="24"
Color=128
Style=1
Y=24
}
Add(Label,7506625,973,42)
{
Left=55
Top=280
Width=165
Caption="Верхняя температурная норма"
}
Add(Label,5273543,973,84)
{
Left=55
Top=355
Width=160
Caption="Нижняя температурная норма"
}
Add(Hub,11937578,588,189)
{
link(onEvent1,3396857:doString,[])
link(onEvent2,12848750:doAdd,[(614,202)(614,279)(513,279)(513,356)])
}
Add(Memo,12848750,525,350)
{
Left=550
Top=10
Width=215
AddType=1
ScrollBars=2
}
Add(Timer,4404277,245,231)
{
Interval=200
link(onTimer,13091773:doData,[])
}
Add(DoData,13091773,301,231)
{
Data=Integer(128)
link(onEventData,6263210:doRead,[(366,237)(366,223)])
}
Add(DSC_Query,15847114,665,322)
{
SQL="SELECT * FROM Table1 WHERE "data REAL" ='%1', "t REAL" ='%2';"
DSManager="rt"
link(onError,2027084:doAdd,[])
}
Add(Button,4246772,399,364)
{
Left=785
Top=30
}
Add(Memo,2027084,714,336)
{
Left=860
Top=5
Width=290
AddType=1
ScrollBars=2
}


--- Добавлено в 2018-12-11 07:52:57

запрос надо было делать не из TABLE а из data. Теперь нет ошибки но все равно нифига по запросу не выдает.
карма: 0

0
Редактировалось 1 раз(а), последний 2018-12-11 07:52:57