Add(MainForm,3063070,280,161)
{
 link(onCreate,2106005:doEvent1,[(340,181)(340,195)])
}
Add(DSC_Exec,5404102,504,189)
{
 SQL="CREATE TABLE if not exists reshenia_1(\r\nid integer primary key AUTOINCREMENT, --1. id\r\nnom_res TEXT, --2. номер решения\r\ndv_res INTEGER --3. дата выдачи решения\r\n);\r\n"
 DSManager="db1"
 link(onError,4162166:doWork,[])
}
Add(DS_SQLite,3869661,448,189)
{
 Name="db1"
 Point(onError)
 link(onOpen,5404102:doExec,[])
 link(onError,7634737:doWork,[(488,202)(488,230)])
}
Add(Dir,1293062,399,140)
{
}
Add(StrCat,9571880,399,189)
{
 Str2="Reshenia_1.db"
 link(onStrCat,3869661:doOpen,[])
 link(Str1,1293062:CurrentDir,[])
 AddHint(58,-21,87,13,Str2)
}
Add(LineBreakEx,4162166,560,196)
{
 Caption="Error"
}
Add(LineBreakEx,7634737,497,224)
{
 Caption="Error"
}
Add(LineBreakEx,6650179,714,455)
{
 Caption="Error"
 Type=1
 link(OnEvent,14032303:doMessage,[])
}
Add(Message,14032303,770,455)
{
 Caption="Error"
}
Add(Hub,2106005,350,189)
{
 OutCount=3
 link(onEvent1,9571880:doStrCat,[])
 link(onEvent3,6131663:doWork1,[(382,209)])
}
Add(VisualStrings,11064064,196,126)
{
 @Hint=#11:Имя таблицы|
 Lines=#10:Reshenia_1|
 Width=67
}
Add(LineBreakEx,1196580,196,154)
{
 Type=3
 link(_Data,11064064:Text,[])
}
Add(FormatStr,13119041,413,434)
{
 DataCount=3
 Mask="INSERT OR REPLACE INTO '%1' VALUES (NULL, '%2', '%3');"
 Point(FString)
 link(onFString,1066544:doCharset,[])
 link(Str1,9563998:getVar,[(419,425)(398,425)])
 link(Str2,5325190:Text,[])
 link(Str3,12562534:Var1,[(433,404)])
}
Add(DSC_Exec,13037445,525,434)
{
 DSManager="db1"
 link(onError,6757936:doWork,[])
}
Add(LineBreakEx,9563998,392,406)
{
 Type=2
}
Add(LineBreakEx,6757936,567,441)
{
 Caption="Error"
}
Add(Charset,1066544,476,434)
{
 Type=6
 link(onCharset,13037445:doExec,[])
}
Add(Button,11933617,294,427)
{
 Left=10
 Top=50
 Width=165
 Height=35
 Caption="Добавить строку в базу"
 link(onClick,10442618:doEvent1,[])
}
Add(Edit,5325190,420,364)
{
 Left=130
 Top=20
 Width=120
}
Add(DatePicker,13906050,532,266)
{
 Left=260
 Top=20
 Width=105
 Height=21
 Point(CurrentDateTime)
 Point(DateInt)
}
Add(FormatStr,11020164,441,511)
{
 Mask="SELECT nom_res FROM '%1' WHERE dv_res = '%2';"
 link(onFString,1963478:doCharset,[])
 link(Str1,3136427:getVar,[])
 link(Str2,12562534:Var2,[(454,502)(461,502)])
}
Add(Button,4682251,385,511)
{
 Left=10
 Top=205
 Width=165
 Height=35
 Caption="Найти строку в базу"
 link(onClick,11020164:doString,[])
}
Add(Edit,15203951,707,511)
{
 Left=185
 Top=210
 Width=190
 Height=25
}
Add(Charset,1963478,497,511)
{
 Type=6
 link(onCharset,3248021:doQuery,[])
}
Add(LineBreakEx,1041268,665,574)
{
 Caption="Error"
}
Add(Label,6621469,623,343)
{
 Left=180
 Top=55
 Width=190
 Height=20
}
Add(Hub,10442618,357,427)
{
 link(onEvent1,6131663:doWork3,[(382,433)])
 link(onEvent2,13119041:doString,[])
}
Add(HubEx,6131663,378,343)
{
 link(onEvent,6823682:doData,[])
}
Add(LineBreakEx,3136427,441,483)
{
 Type=2
}
Add(GetDataEx,12562534,455,399)
{
 link(Data,13051045:Var1,[(461,323)])
}
Add(DoData,6823682,539,343)
{
 link(onEventData,6621469:doText,[])
 link(Data,13051045:Var2,[])
}
Add(GetDataEx,13051045,539,318)
{
 link(Data,13906050:DateInt,[])
}
Add(Charset,16019619,644,511)
{
 @Color=5636095
 Type=7
 link(onCharset,15203951:doText,[])
}
Add(DSC_Query,3248021,574,511)
{
 @Color=43775
 DSManager="db1"
 link(onQuery,16019619:doCharset,[])
 link(onError,1041268:doWork,[(613,531)(613,580)])
}