Вот тебе твой пример. Разбирайся
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,[]) }
|