Add(MainForm,2953706,84,98)
{
 Width=575
 Height=115
 Point(onClose)
 link(onCreate,15551386:doOpen,[])
 link(onClose,15551386:doClose,[])
}
Add(SQLite_DB,15551386,175,112)
{
 FileName="bq.txt"
 WaitClose=0
 link(onOpen,9730910:doOn,[])
 link(onError,9730910:doOff,[(220,125)(220,111)])
}
Add(Message,15305374,469,189)
{
}
Add(LED,9730910,329,98)
{
 Left=385
 Top=5
 Width=165
 Height=20
 Shape=1
 ColorOn=65280
}
Add(Edit,15478450,224,175)
{
 Left=5
 Top=30
 Width=550
 Text="insert into user(data_reg,barcod,name,otchestvo) values(date(),'000000123457',"Иванов","Иванович");"
 link(onEnter,989069:doWork2,[])
}
Add(Message,5815541,413,203)
{
 Caption="ошибка..."
}
Add(SQLite_Query,9081856,357,189)
{
 link(onQuery,15305374:doMessage,[])
 link(onError,5815541:doMessage,[])
 link(dbHandle,15551386:dbHandle,[(363,160)(181,160)])
}
Add(Hub,580378,273,182)
{
 OutCount=3
 link(onEvent1,13247271:doMessage,[(339,188)(339,244)])
 link(onEvent2,15648650:doWork2,[])
 link(onEvent3,15478450:doText2,[(300,202)(300,226)(212,226)(212,188)])
}
Add(Button,4113000,84,56)
{
 Left=5
 Top=5
 Width=375
 Caption="создание таблицы...user (нажать тока один раз после компиляции) "
 Data=String(CREATE TABLE user (id_user integer PRIMARY KEY AUTOINCREMENT,data_reg date,barcod varchar(14) NOT NULL UNIQUE,name varchar,otchestvo varchar);)
 link(onClick,15648650:doWork1,[(312,62)])
}
Add(Message,13247271,357,238)
{
 Message="запрос ушел..."
 Caption="с концами..."
}
Add(Button,14955474,77,259)
{
 Left=5
 Top=55
 Width=545
 Caption="послать запрос insert"
 link(onClick,12247002:doData,[])
}
Add(DoData,12247002,224,259)
{
 link(onEventData,989069:doWork3,[(263,265)])
 link(Data,15478450:Text,[])
}
Add(HubEx,15648650,308,189)
{
 link(onEvent,9081856:doQuery,[])
}
Add(HubEx,989069,259,182)
{
 link(onEvent,580378:doEvent1,[])
}