#sql
SELECT units, codename, name FROM packs ORDER BY name;

Add(Registry,14475432,98,175)
{
 HKey=1
 Key="SoftwareHiasm_prog"
 Value="hiCoReg"
}

Add(MainForm,2953706,175,105)
{
 Width=508
 Height=96
}
Add(Registry,117125,238,63)
{
 HKey=1
 Key="softwarehiasm_prog"
 Value="dbname"
 link(onRead,11123252:doText2,[(306,69)(306,118)])
}
Add(DropFile,16683987,238,105)
{
 link(onDropFile,14004071:doWork2,[])
}
Add(HubEx,14004071,280,105)
{
 link(onEvent,11123252:doText,[])
}
Add(Button,14099037,175,147)
{
 @Color=16766164
 Left=5
 Top=10
 Width=65
 Height=21
 Font=[Tahoma,9,1,0,204]
 TabOrder=-1
 Caption="Browse"
 link(onClick,2567534:doExecute,[])
}
Add(ODialog,2567534,238,147)
{
 Filter="SQLite files|*.db|New Format|*.db3|All|*.*"
 FileName=""
 link(onExecute,14004071:doWork3,[(284,153)])
}
Add(Edit,11123252,357,105)
{
 Left=80
 Top=10
 Width=330
 Color=15793151
 Font=[Arial,9,1,0,204]
 Text=""
 link(onChange,117125:doWrite,[(411,111)(411,55)(226,55)(226,76)])
}
Add(Button,11958215,294,147)
{
 @Color=16766164
 Left=420
 Top=10
 Width=60
 Height=21
 Font=[Tahoma,9,1,0,204]
 TabOrder=-1
 Caption="Open"
 link(onClick,895851:doData,[])
}
Add(DoData,895851,357,147)
{
 link(Data,11123252:Text,[])
}