Add(MainForm,2953706,49,133)
{
 Width=204
 Height=244
 Position=1
 link(onCreate,4979212:doEvent1,[(97,153)(97,152)])
}
Add(SQLite_DB,10461425,221,233)
{
 link(onOpen,12483077:doValue,[(266,239)(266,218)])
 link(onError,1455368:doWork,[(271,246)(271,251)])
 link(FileName,10387331:Var3,[(227,179)])
}
Add(GlobalVar,12483077,284,212)
{
 Name="Test"
}
Add(FileTools,5068060,172,191)
{
 @Hint=#19:Проверка наличия БД|
 link(onEnd,15065978:doValue,[(223,197)(223,113)])
 link(FileName,10387331:Var2,[])
}
Add(If_else,13598995,249,163)
{
 Op2=Integer(0)
 link(onTrue,1294434:doExec,[])
 link(Op1,15065978:Value,[])
}
Add(Memory,15065978,249,107)
{
 @Hint=#6:Имя БД|
}
Add(SQLite_Exec,1294434,291,163)
{
 SQL="CREATE TABLE testw (TERRA TEXT)"
 link(onError,11961430:doWork,[(312,169)(312,167)])
 link(dbHandle,283995:Var,[])
}
Add(GlobalVar,283995,291,128)
{
 Name="Test"
}
Add(StrCat,14378111,172,128)
{
 Str2=".dat"
 link(Str1,3817270:Value,[(178,116)(183,116)])
}
Add(GetDataEx,10387331,172,174)
{
 link(Data,14378111:Result,[])
}
Add(LineBreakEx,1455368,289,245)
{
}
Add(Hub,4979212,106,146)
{
 OutCount=5
 link(onEvent1,14378111:doStrCat,[(160,152)(160,134)])
 link(onEvent2,5068060:doFileExists,[(160,159)(160,218)])
 link(onEvent3,10461425:doOpen,[(143,166)(143,239)])
 link(onEvent4,13598995:doCompare,[(195,173)(195,169)])
 link(onEvent5,12174927:doEvent1,[(130,180)(130,349)])
}
Add(Memory,3817270,177,73)
{
 @Hint=#6:Имя БД|
 Default=String(testw)
}
Add(Hub,12174927,199,343)
{
 InCount=3
 OutCount=4
 link(onEvent1,12751562:doClearAll,[(239,349)(239,342)])
 link(onEvent2,3172968:doQuery,[])
}
Add(GlobalVar,12309576,248,315)
{
 Name="Test"
}
Add(SQLite_Query,3172968,248,350)
{
 SQL="Select TERRA FROM testw"
 link(onQuery,12751562:doAddRow,[(304,356)(304,328)])
 link(onColumns,12751562:doAddCols,[(313,363)(313,335)])
 link(onError,4413267:doWork,[])
 link(dbHandle,12309576:Var,[])
}
Add(MST_DB,12751562,329,322)
{
 MSTControl="test"
 Point(doClearAll)
}
Add(LineBreakEx,4071508,164,308)
{
 Caption="New"
 Type=1
 link(OnEvent,12174927:doEvent2,[(212,314)(212,335)(187,335)(187,356)])
}
Add(MTStrTbl,6321141,49,182)
{
 Left=10
 Top=44
 Width=175
 Height=125
 Name="test"
 Style=4
 Grid=0
 Point(ItemAtPos)
 Point(onBeforeLineChange)
}
Add(FormatStr,954354,301,553)
{
 DataCount=1
 Mask="INSERT INTO testw values("%1")"
 link(onFString,10345960:doExec,[])
 link(Str1,6050367:Value,[])
}
Add(SQLite_Exec,10345960,343,553)
{
 link(onError,14624089:doWork,[])
 link(dbHandle,11895895:Var,[])
}
Add(GlobalVar,11895895,343,532)
{
 Name="Test"
}
Add(LineBreakEx,11719003,304,588)
{
 Caption="New"
}
Add(Hub,9023606,273,546)
{
 OutCount=3
 link(onEvent1,14647492:doReplace,[(409,552)(409,408)(148,408)(148,426)])
 link(onEvent2,954354:doString,[])
 link(onEvent3,11719003:doWork,[(295,566)(295,594)])
}
Add(LineBreakEx,11961430,343,161)
{
}
Add(LineBreakEx,4413267,301,364)
{
}
Add(LineBreakEx,14624089,385,553)
{
}
Add(LineBreakEx,1763033,532,84)
{
 Type=1
 link(OnEvent,16312144:doMessage,[])
}
Add(Message,16312144,574,84)
{
}
Add(Button,13424232,224,546)
{
 Left=10
 Top=10
 Width=60
 Caption="Добавить"
 link(onClick,9023606:doEvent1,[])
}
Add(Edit,10170800,105,413)
{
 Left=95
 Top=10
 Width=90
 Text="25.5600"
}
Add(Edit,14347238,357,714)
{
 Left=95
 Top=180
 Width=90
 Text=""
}
Add(Button,8089713,91,651)
{
 Left=10
 Top=180
 Width=60
 Caption="Сумма"
 link(onClick,10284965:doQuery,[])
}
Add(SQLite_Query,10284965,140,651)
{
 SQL="SELECT SUM(TERRA) FROM testw"
 link(onQuery,8507384:doReplace,[])
 link(dbHandle,10850153:Var,[(146,643)(150,643)])
}
Add(GlobalVar,10850153,144,620)
{
 Name="Test"
}
Add(InfoTip,11991919,84,280)
{
 Info=#7:Таблица|
 Frame=2
 Width=358
 Height=116
}
Add(InfoTip,16542099,84,616)
{
 Info=#5:Сумма|
 Frame=2
 Width=358
 Height=172
}
Add(InfoTip,6896219,84,399)
{
 Info=#17:Добавление записи|
 Frame=2
 Width=358
 Height=214
}
Add(InfoTip,3403940,98,49)
{
 Info=#13:Создание базы|
 Frame=2
 Width=316
 Height=228
}
Add(InfoTip,5913607,420,56)
{
 Info=#6:Ошибки|
 Frame=2
 Width=316
 Height=67
}
Add(StrCat,15247803,259,420)
{
 Str2="00000000"
 link(onStrCat,3505056:doCopy,[])
}
Add(Copy,3505056,301,420)
{
 Position=1
 Count=8
 link(onCopy,14698116:doValue,[])
}
Add(StrPart,4705376,203,420)
{
 Char="."
 Point(Left)
 Point(onNotFound)
 link(onSplit,15247803:doStrCat,[])
 link(onNotFound,3670333:doStrCat,[(245,440)(245,471)(149,471)(149,524)])
}
Add(StrCat,16735933,203,483)
{
 Str2="."
 link(onStrCat,8771882:doStrCat,[])
 link(Str1,4705376:Left,[])
}
Add(Memory,14698116,343,420)
{
 link(onData,16735933:doStrCat,[(379,425)(384,426)(384,465)(191,465)(191,489)])
}
Add(StrCat,8771882,245,483)
{
 link(onStrCat,3641277:doWork2,[])
 link(Str2,14698116:Value,[(258,474)(349,474)])
}
Add(StrCat,3670333,161,518)
{
 Str2=".00000000"
 link(onStrCat,3641277:doWork3,[(284,524)])
 link(Str1,8443474:Var3,[(167,482)])
}
Add(HubEx,3641277,280,483)
{
 link(onEvent,860397:doEvent1,[])
}
Add(Replace,14647492,154,420)
{
 SubStr=","
 DestStr="."
 link(onReplace,4705376:doSplit,[])
 link(Str,8443474:Var1,[(160,408)(132,408)])
}
Add(Hub,860397,301,483)
{
 link(onEvent1,10170800:doText,[(326,489)(326,458)(93,458)(93,419)])
 link(onEvent2,6050367:doValue,[(327,496)(327,506)(289,506)(289,517)])
}
Add(Memory,6050367,301,511)
{
}
Add(StrCat,6297561,294,651)
{
 Str2="00000000"
 link(onStrCat,2446487:doCopy,[])
}
Add(Copy,2446487,336,651)
{
 Position=1
 Count=8
 link(onCopy,12715631:doValue,[])
}
Add(StrPart,815667,238,651)
{
 Char="."
 Point(Left)
 Point(onNotFound)
 link(onSplit,6297561:doStrCat,[])
 link(onNotFound,14279743:doStrCat,[(280,671)(280,702)(184,702)(184,755)])
}
Add(StrCat,10107826,238,714)
{
 Str2="."
 link(onStrCat,10900599:doStrCat,[])
 link(Str1,815667:Left,[])
}
Add(Memory,12715631,378,651)
{
 link(onData,10107826:doStrCat,[(414,656)(419,657)(419,696)(226,696)(226,720)])
}
Add(StrCat,10900599,280,714)
{
 link(onStrCat,11170653:doWork2,[])
 link(Str2,12715631:Value,[(293,705)(384,705)])
}
Add(StrCat,14279743,196,749)
{
 Str2=".00000000"
 link(onStrCat,11170653:doWork3,[(319,755)])
}
Add(HubEx,11170653,315,714)
{
 link(onEvent,14347238:doText,[])
}
Add(Replace,8507384,189,651)
{
 SubStr=","
 DestStr="."
 link(onReplace,815667:doSplit,[])
}
Add(GetDataEx,8443474,126,477)
{
 Angle=3
 link(Data,10170800:Text,[(111,482)])
}