Вверх ↑
Ответов: 758
Рейтинг: 112
#1: 2010-11-22 10:38:04 ЛС | профиль | цитата
Вот тебе твой пример. Разбирайся

Add(MainForm,11608388,329,189)
{
Width=154
Height=463
link(onCreate,9424075:doOpen,[])
}
Add(DS_SQLite,9424075,399,203)
{
Name="DB"
FileName="basa.db"
link(onOpen,5912652:doEvent1,[])
}
Add(DSC_Query,11759369,497,210)
{
SQL="SELECT Артикул \r\nFROM Tab\r\nWHERE Артикул>0 \r\nORDER BY Артикул "
DSManager="DB"
link(onQuery,14849691:doAdd,[])
link(onError,2835190:doWork2,[(541,230)(541,279)])
}
Add(ListBox,14849691,553,210)
{
Left=10
Top=10
Width=125
Height=410
}
Add(DSC_Exec,15225438,644,154)
{
SQL="CREATE TABLE [Tab] (\r\n [Артикул] TEXT,\r\n [Наименование] TEXT,\r\n [Закупка] TEXT,\r\n [Процент] TEXT,\r\n [Стоимость] TEXT,\r\n [Наличие] TEXT);\r\n \r\nINSERT INTO Tab ('Артикул', 'Наименование', 'Закупка', 'Процент', 'Стоимость','Наличие') VALUES ('92664','Авоська BUILT "Fishnet Market Tote MFN-BRY", Black Ruspberry','990','10','1089','»»»»');\r\nINSERT INTO Tab ('Артикул', 'Наименование', 'Закупка', 'Процент', 'Стоимость','Наличие') VALUES ('92665','Авоська BUILT "Fishnet Market Tote MFN-NLS", Nolita Stripe','990','10','1089','»»»');\r\nINSERT INTO Tab ('Артикул', 'Наименование', 'Закупка', 'Процент', 'Стоимость','Наличие') VALUES ('84723','Автомобильный FM-модулятор Digma "BFT-300" (питание 12В от прикуривателя)','1144','10','1258.4','»»»»'); "
DSManager="DB"
link(onError,2835190:doWork1,[(689,167)])
}
Add(Hub,5912652,448,203)
{
link(onEvent1,3805254:doWork,[(469,209)(469,160)])
link(onEvent2,11759369:doQuery,[])
}
Add(Check,3805254,483,154)
{
Check=1
Caption="Включи для создания БД"
link(onEvent,15225438:doExec,[])
}
Add(Message,3472248,721,273)
{
}
Add(HubEx,2835190,685,273)
{
link(onEvent,3472248:doMessage,[])
}
карма: 1

1
Голосовали:hajikov