Add(MainForm,4842992,280,196)
{
 Width=718
 Height=406
}
Add(Button,5667771,336,273)
{
 Left=10
 Top=60
 Width=80
 Caption="Создать"
 link(onClick,7640810:doEvent1,[])
}
Add(Edit,14560686,476,231)
{
 Left=10
 Top=30
 Width=120
 Text="eferere.db"
}
Add(Label,121854,280,154)
{
 Left=10
 Top=5
 Width=123
 Height=17
 Caption="Название базы данных"
}
Add(MTStrTbl,4626275,336,196)
{
 Left=160
 Top=10
 Width=530
 Height=200
 Name="mtst"
}
Add(DS_SQLite,7707573,476,280)
{
 Name="mdb"
 WaitClose=0
 link(onOpen,8256804:doEvent1,[])
 link(FileName,14560686:Text,[])
}
Add(DSC_Exec,16718266,574,280)
{
 SQL="CREATE TABLE IF NOT EXISTS[tab1](\r\n  [id] INTEGER PRIMARY KEY AUTOINCREMENT, \r\n  [date] DATE, \r\n  [familia] TEXT, \r\n  [opisanie] TEXT, \r\n  [work] TEXT, \r\n  [summa] TEXT);\r\nINSERT INTO tab1 VALUES(\r\n    Null,\r\n    '2024-09-21',\r\n    'Пупкин Николай Владимирович',\r\n    'работа',\r\n    'решил',\r\n    '2500');"
 DSManager="mdb"
}
Add(DSC_Query,12956405,574,322)
{
 SQL="SELECT date AS Дата,familia AS Фамилия,opisanie AS Описание,work AS Работа,summa AS Сумма FROM "tab1";"
 DSManager="mdb"
 link(onQuery,5392188:doAddRow,[])
 link(onColumns,5392188:doAddCols,[])
}
Add(MST_DB,5392188,630,322)
{
 MSTControl="mtst"
}
Add(Hub,8256804,525,280)
{
 link(onEvent1,16718266:doExec,[])
 link(onEvent2,12956405:doQuery,[(557,293)(557,328)])
}
Add(Hub,7640810,385,273)
{
 link(onEvent1,14141324:doClear,[(410,279)(410,237)])
 link(onEvent2,7707573:doOpen,[])
}
Add(MST_Clear,14141324,420,231)
{
 ClearAll=0
 MSTControl="mtst"
}