
Add(TabControl,8774474,455,175)
{
Left=5
Top=11
Width=735
Height=480
Tabs=#10:Інформація|8:Персонал|2:ТО|4:Шини|3:АКБ|5:Масло|18:Охолоджуюча рідина|15:Тормозна рідина|3:ЗІП|10:Моторесурс|
Bitmaps=[]
Buttons=0
HotTrack=0
Point(PageTab)
link(onChange,5097057:doGetString,[])
}
Add(DatePicker,6955404,84,77)
{
Left=695
Top=10
Width=115
Height=21
}
Add(ChanelToIndex,983114,406,182)
{
link(onIndex,8774474:PageTab,[])
}
Add(Hub,16008142,371,175)
{
link(onEvent1,983114:doWork2,[(392,181)(392,195)])
link(onEvent2,983114:doWork1,[])
}
Add(MainForm,5210529,210,161)
{
Width=836
Height=606
Point(onClose)
link(onCreate,9005992:doOpen,[])
link(onClose,9005992:doClose,[])
}
Add(Menu,7920668,84,133)
{
Menu=#4:Файл|1:(|5:Новий|8:Відкрити|8:Зберегти|11:Зберегти як|1:-|5:Вихід|1:)|8:Допомога|12:Про програму|
Point(onSelectNum)
link(onSelectNum,3934991:doEvent,[])
}
Add(IndexToChanel,3934991,154,140)
{
Count=9
link(onEvent7,5210529:doClose,[])
link(onEvent9,10924091:doMessage,[])
}
Add(Message,10924091,210,196)
{
Message="Привет "
}
Add(ChildGroupBox,13869979,560,168)
{
}
BEGIN_SDK
Add(EditMulti,1093219,21,14)
{
WorkCount=2
Width=706
Height=305
link(doWork1,1821971:doBringToFront,[])
link(doWork2,16696379:doSplit,[])
}
Add(GroupBox,1821971,147,14)
{
Left=15
Top=35
Width=797
Height=450
Font=[Courier New,11,1,255,204]
Caption=""
Point(doBringToFront)
Point(doCaption)
}
Add(StringTableMT,3507321,406,84)
{
Left=10
Top=55
Width=775
Height=320
Columns=#4:№=25|22:Загальні відомості=200|9:Данні=250|
StrDelimiter="\9"
ClearAll=0
Redaction=0
Grid=0
IconsCheck=[]
MiscIcons=[]
Icons=[]
Point(doMT_Add)
Point(Strings)
Point(onLineChange)
Point(Index)
Point(doMT_AddCols)
Point(doAutoColWidth)
link(onLineChange,8097891:doRead,[])
}
Add(Button,5227062,224,266)
{
Left=10
Top=34
Width=120
Caption="Добавить строку"
link(onClick,14995619:doString,[])
}
Add(ArrayRW,8097891,469,91)
{
link(onRead,8118530:doSplit,[])
link(Array,10746862:Var3,[(475,79)(452,79)(452,152)])
}
Add(DSC_Query,5954143,308,105)
{
DSManager="parent.db"
link(onQuery,3507321:doMT_Add,[])
link(onColumns,3507321:doMT_AddCols,[])
}
Add(DSC_Exec,8261552,665,196)
{
DSManager="parent.db"
link(onExec,4043533:doWork3,[(711,202)(711,305)(201,305)])
}
Add(Hub,16210215,266,98)
{
InCount=2
OutCount=3
link(onEvent1,3507321:doClear,[(343,104)(343,97)])
link(onEvent2,5954143:doQuery,[])
link(onEvent3,3507321:doAutoColWidth,[(293,118)(293,144)(348,144)(348,125)])
}
Add(Button,9039559,224,217)
{
Left=135
Top=34
Width=120
Caption="Удалить строку"
link(onClick,12175230:doEvent1,[])
}
Add(Hub,12175230,315,217)
{
link(onEvent1,16009664:doRead,[])
link(onEvent2,14938611:doData,[])
}
Add(DoData,14938611,343,224)
{
Point(Data)
link(onEventData,3507321:doDelete,[(391,230)(391,104)])
link(Data,13069318:Var1,[(349,201)])
}
Add(FormatStr,9911972,518,217)
{
Mask="DELETE FROM %2 WHERE number=%1"
Point(doMask)
link(onFString,13546320:doWork2,[])
link(Str1,1062532:Part1,[(524,209)(507,209)(507,256)(475,256)])
link(Str2,664325:Var3,[(531,191)])
}
Add(ArrayRW,16009664,420,217)
{
link(onRead,1062532:doSplit,[])
link(Array,10746862:Var2,[])
link(Index,13069318:Var2,[])
}
Add(GetDataEx,10746862,420,147)
{
link(Data,3507321:Strings,[])
}
Add(GetDataEx,13069318,427,196)
{
link(Data,3507321:Index,[])
}
Add(MultiStrPart,1062532,469,217)
{
Char="\9"
Count=1
link(onSplit,9911972:doString,[])
}
Add(MultiStrData,16696379,56,21)
{
Char="|"
Count=3
link(onPart1,1821971:doCaption,[])
link(onPart2,8808658:doValue,[(142,34)(142,62)])
link(onPart3,12471083:In,[])
}
Add(HubEx,13546320,644,217)
{
link(onEvent,8261552:doExec,[(658,223)(658,202)])
}
Add(FormatStr,6136212,518,147)
{
DataCount=17
Mask=""
Point(doMask)
link(onFString,13546320:doWork1,[(648,153)])
link(Str1,8118530:Part1,[])
link(Str2,8118530:Part2,[])
link(Str3,8118530:Part3,[])
link(Str4,8118530:Part4,[])
link(Str5,8118530:Part5,[])
link(Str6,8118530:Part6,[])
link(Str7,8118530:Part7,[])
link(Str8,8118530:Part8,[])
link(Str9,8118530:Part9,[])
link(Str10,8118530:Part10,[])
link(Str11,8118530:Part11,[])
link(Str12,8118530:Part12,[])
link(Str13,8118530:Part13,[])
link(Str14,8118530:Part14,[])
link(Str15,8118530:Part15,[])
link(Str16,8118530:Part16,[])
link(Str17,8118530:Part17,[])
}
Add(MultiStrPart,8118530,518,91)
{
Char="\9"
Count=17
link(onSplit,6136212:doString,[(652,97)(652,135)(506,135)(506,153)])
}
Add(LineBreak,9999884,462,154)
{
@Color=16733695
Caption="Mask"
Color=65280
link(Out,6136212:doMask,[])
Primary=[12471083,-364,-119]
}
Add(Memory,8808658,161,56)
{
link(onData,4043533:doWork1,[(201,62)])
}
Add(FormatStr,14995619,280,266)
{
Mask="INSERT INTO %1(number) SELECT CASE WHEN COUNT()=0 THEN 1 ELSE max(number)+1 END FROM %1;"
link(onFString,13546320:doWork3,[(648,272)])
link(Str1,664325:Var2,[])
}
Add(FormatStr,15935330,217,105)
{
DataCount=1
Mask="SELECT * FROM %1;"
link(onFString,16210215:doEvent2,[])
link(Str1,3755450:Var3,[(223,97)])
}
Add(GetDataEx,3755450,161,92)
{
link(Data,8808658:Value,[])
}
Add(HubEx,4043533,197,105)
{
link(onEvent,15935330:doString,[])
}
Add(GetDataEx,664325,280,186)
{
Angle=3
link(Data,3755450:Var2,[(167,191)])
}
END_SDK
Add(DSC_Exec,9339001,315,175)
{
SQL="CREATE TABLE IF NOT EXISTS table1 (number INTEGER, firstname TEXT, lastname TEXT); -- Информация\r\nCREATE TABLE IF NOT EXISTS table2 (number INTEGER, firstname TEXT, lastname TEXT, serial TEXT, date TEXT); -- Персонал\r\nCREATE TABLE IF NOT EXISTS table3 (number INTEGER, firstname TEXT, lastname TEXT, date TEXT, conclusion TEXT); -- ТО\r\nCREATE TABLE IF NOT EXISTS table4 (number INTEGER, firstname TEXT, lastname TEXT, factory TEXT, date TEXT, install TEXT, remove TEXT, cause TEXT); -- Шины\r\nCREATE TABLE IF NOT EXISTS table5 (number INTEGER, firstname TEXT, lastname TEXT, factory TEXT, date TEXT, state TEXT, installation TEXT, training TEXT, cause TEXT); -- АКБ\r\nCREATE TABLE IF NOT EXISTS table6 (number INTEGER, firstname TEXT, lastname TEXT, cause TEXT, date TEXT, filter TEXT); -- Масло\r\nCREATE TABLE IF NOT EXISTS table7 (number INTEGER, firstname TEXT, lastname TEXT, cause TEXT); -- Охлаждающая жидкость\r\nCREATE TABLE IF NOT EXISTS table8 (number INTEGER, firstname TEXT, lastname TEXT,cause TEXT); -- Тормозная\r\nCREATE TABLE IF NOT EXISTS table9 (number INTEGER, firstname TEXT, lastname TEXT, availability TEXT); --ЗИП\r\nCREATE TABLE IF NOT EXISTS table10 (number INTEGER, firstname TEXT, lastname TEXT, jan TEXT, feb TEXT, march TEXT , april TEXT, may TEXT, june TEXT, jule TEXT, august TEXT, sept TEXT, october TEXT, november TEXT, december TEXT, year TEXT, start TEXT, end TEXT); --Моторесурс\r\n"
DSManager="db"
link(onExec,16008142:doEvent1,[])
}
Add(DS_SQLite,9005992,266,175)
{
Name="db"
FileName="MyDataBase1.db"
link(onOpen,9339001:doExec,[])
}
Add(StrList,5097057,504,175)
{
Strings=#82:Iнформацiя|table1|UPDATE table1 SET firstname='%2', lastname='%3' WHERE number=%1;|104:Персонал|table2|UPDATE table2 SET firstname='%2', lastname='%3', serial='%4', date='%5' WHERE number=%1;|103:ТО|table3|UPDATE table3 SET firstname='%2', lastname='%3', date='%4', conclusion='%5' WHERE number=%1;|140:Шини|table4|UPDATE table4 SET firstname='%2', lastname='%3', factory='%4', date='%5', install='%6', remove='%7', cause='%8' WHERE number=%1;|158:АКБ|table5|UPDATE table5 SET firstname='%2', lastname='%3',factory='%4', date='%5', state='%6' , installation='%7', training='%8', cause='%9' WHERE number=%1;|113:Масло|table6|UPDATE table6 SET firstname='%2', lastname='%3', cause='%4', date='%5', filter='%6' WHERE number=%1;|102:Охолоджуюча рідина|table7|UPDATE table7 SET firstname='%2', lastname='%3', cause='%4' WHERE number=%1;|99:Тормозна рідина|table8|UPDATE table8 SET firstname='%2', lastname='%3', cause='%4' WHERE number=%1;|94:ЗIП|table9|UPDATE table9 SET firstname='%2', lastname='%3', availability='%4' WHERE number=%1;|288:Моторесурс|table10|UPDATE table10 SET firstname='%2', lastname='%3', feb = '%4', march = '%5' , april = '%6', may = '%7', june = '%8', jule = '%9', august = '%10', sept = '%11' , october = '%12' , november = '%13', december = '%14', year= '%15' , start= '%16', end= '%17' WHERE number=%1;|0:|
Point(doGetString)
Point(onGetString)
link(onGetString,13869979:doWork2,[])
}
UPDATE table10 SET firstname='%2', lastname='%3', feb = '%4', march = '%5' , april = '%6', may = '%7', june = '%8', jule = '%9', august = '%10', sept = '%11' , october = '%12' , november = '%13', december = '%14', year= '%15' , start= '%16', end= '%17' WHERE number=%1
Forget_Flin писал(а):
если машина проезжает более n количество км то должна загораться лампочка 
При твоей организации БД - лампочка не загорится НИКОГДА.