Add(MainForm,3063237,119,189)
{
 Width=398
 Height=258
}
Add(MTStrTbl,15043066,161,189)
{
 Width=390
 Height=200
 Name="MTStrTbl"
}
Add(MST_DB,3396977,329,273)
{
 MSTControl="MTStrTbl"
}
Add(Button,9736692,119,273)
{
 Left=130
 Top=200
 Width=140
 TabOrder=-1
 Caption="Читать базу элементов"
 link(onClick,9358416:doRead,[])
}
Add(PointHint,613683,105,238)
{
 Info=#25:Пример чтения базы данных|
 Transparent=0
 VAlign=0
 Width=281
 Height=88
}
Add(Registry,9358416,161,273)
{
 HKey=1
 Key="Software\hiasm"
 Value="InstallPath"
 NotEmpty=1
 link(onRead,13303169:doStrCat,[])
}
Add(StrCat,13303169,203,273)
{
 Str2="\Elements\Delphi\Elements.db"
 link(onStrCat,219028:doOpen,[])
}
Add(DS_SQLite,219028,245,273)
{
 Name="sqlite"
 WaitClose=0
 link(onOpen,7042543:doQuery,[])
}
Add(DSC_Query,7042543,287,273)
{
 SQL="SELECT * FROM elements;"
 DSManager="sqlite"
 link(onQuery,3396977:doAddRow,[])
 link(onColumns,3396977:doAddCols,[])
}