Serascer писал(а): хочу выделить строчку и при нажатии кнопки Изменить, должно открыться окошко, где я в отдельных полях могу изменить все данные. У модуля MT таблица строк есть внизу точка - Select, там указано, что содержит все выделенную строку с данными в виде MT элементов. А как бы вытащить их и разложить? Я понимаю, что это можно сделать с помощью разложения MT потока на элементы, но как именно? Мне только ID строки постоянно выдается. Правая кнопка мыши на строчке, которую хочешь изменить Add(MainForm,1130157,140,112) { Width=718 Height=406 Point(onClose) link(onCreate,7707573:doOpen,[]) link(onClose,7707573:doClose,[]) } Add(MTStrTbl,4626275,140,196) { Left=160 Top=10 Width=530 Height=200 Align=5 Name="mytbl" Columns=#4:Дата|7:Фамилия|8:Описание|6:Работа|5:Сумма| Point(onMouseDown) link(onMouseDown,7623674:doEvent,[]) } Add(DS_SQLite,7707573,196,126) { Name="mdb" FileName="mydarabase.db" WaitClose=0 link(onOpen,16718266:doExec,[]) } Add(DSC_Exec,16718266,252,126) { 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\n" DSManager="mdb" link(onExec,12639736:doEvent1,[]) } Add(DSC_Query,12956405,357,133) { SQL="SELECT \r\n date,\r\n familia,\r\n opisanie,\r\n work,\r\n summa,\r\n id \r\nFROM tab1;\r\n" DSManager="mdb" link(onQuery,5392188:doAddRow,[]) } Add(MST_DB,5392188,413,133) { MSTControl="mytbl" } Add(Hub,12639736,315,126) { InCount=3 OutCount=3 link(onEvent1,15792448:doClear,[(340,132)(340,97)]) link(onEvent2,12956405:doQuery,[]) link(onEvent3,14072073:doColAction,[(347,146)(347,181)]) } Add(MST_ColAction,14072073,357,175) { Action=9 Index=-2 MSTControl="mytbl" } Add(PopupMenu,15198874,294,231) { Menu=#15:Добавить запись|8:Изменить|7:Удалить|0:| link(onClick,1907426:doEvent,[]) } Add(DeferredEvent,9633104,245,231) { link(onDeferredEvent,15198874:doPopupHere,[]) } Add(IndexToChanel,1907426,350,231) { Count=3 link(onEvent1,3731829:doWork1,[]) link(onEvent2,1289256:doWork1,[(396,244)(396,314)]) link(onEvent3,2780906:doMessage,[(389,251)(389,377)]) } Add(IndexToChanel,7623674,196,224) { link(onEvent2,9633104:doDeferredEvent,[]) } Add(ChildForm,3731829,406,231) { link(onEvent1,6524517:doWork,[]) } BEGIN_SDK Add(EditMulti,1491838,21,14) { EventCount=1 WorkCount=1 Width=615 Height=347 link(doWork1,475173:doEvent1,[(67,20)(67,62)]) } Add(MainForm,13367302,119,28) { Left=35 Top=105 Width=504 Height=218 Visible=1 Caption="Добавление новой записи" Point(doVisible) } Add(Button,1416819,168,189) { Left=225 Top=125 Width=110 Height=30 Caption="Создать запись" link(onClick,15597162:doString,[]) } Add(Edit,13718670,287,112) { Left=10 Top=80 Width=120 Text="" } Add(Label,10493128,364,49) { Left=10 Top=5 Width=30 Height=17 Caption="Дата" } Add(DSC_Exec,12580462,301,189) { DSManager="parent.mdb" link(onExec,2150116:doEvent1,[]) } Add(DatePicker,11740223,112,112) { Left=5 Top=30 Width=115 Height=21 link(onChange,3131699:doWork2,[]) } Add(Label,8723371,368,46) { Left=10 Top=60 Width=53 Height=17 Caption="Фамилия" } Add(Edit,1991437,342,110) { Left=160 Top=30 Width=310 Text="" } Add(Label,10818380,290,37) { Left=160 Top=10 Width=54 Height=17 Caption="Описание" } Add(Label,7006651,361,42) { Left=170 Top=60 Width=40 Height=17 Caption="Работа" } Add(Edit,6769963,385,108) { Left=160 Top=80 Width=310 Text="" } Add(Edit,10926788,431,113) { Left=10 Top=130 Width=120 Text="" DataType=1 } Add(Label,14976561,330,40) { Left=10 Top=110 Width=59 Height=17 Caption="Стоимость" } Add(DateConvertor,5015877,224,112) { Mode=9 Format="yyyy-MM-dd" Point(Result) Point(Data) link(Data,12298793:DateTime,[]) } Add(FormatStr,15597162,224,189) { DataCount=5 Mask="INSERT\r\nINTO\r\n [tab1](\r\n [date],\r\n [familia],\r\n [opisanie],\r\n [work],\r\n [summa])\r\nVALUES(\r\n '%1',\r\n '%2',\r\n '%3',\r\n '%4',\r\n %5);\r\n" link(onFString,12580462:doExec,[]) link(Str1,5015877:Result,[]) link(Str2,13718670:Text,[(237,152)(293,152)]) link(Str3,1991437:Text,[(244,159)(348,159)]) link(Str4,6769963:Text,[(251,166)(391,166)]) link(Str5,10926788:Text,[(258,173)(437,173)]) } Add(Hub,2150116,378,189) { link(onEvent1,1491838:onEvent1,[(466,195)(466,20)]) link(onEvent2,14722169:doDeferredEvent,[(410,202)(410,230)]) } Add(DoData,7108916,476,224) { Data=Integer(0) link(onEventData,475173:doEvent2,[(521,230)(521,274)(67,274)(67,69)]) } Add(DeferredEvent,14722169,420,224) { link(onDeferredEvent,7108916:doData,[]) } Add(Hub,475173,77,56) { InCount=2 link(onEvent1,13367302:doVisible,[]) link(onEvent2,3131699:doWork1,[(109,69)(109,97)(186,97)]) } Add(Time,12298793,217,56) { Point(DateTime) } Add(HubEx,3131699,182,112) { link(onEvent,5015877:doConvert,[]) } END_SDK Add(MST_Clear,15792448,357,91) { MSTControl="mytbl" } Add(ChildForm,1289256,406,308) { link(onEvent1,9679634:doWork,[]) link(Data1,14576830:Var2,[]) } BEGIN_SDK Add(EditMulti,15505584,21,14) { EventCount=1 WorkCount=1 DataCount=1 Width=811 Height=459 VOffset=49 link(doWork1,5362846:doEvent1,[]) } Add(MainForm,8915849,112,77) { Left=35 Top=105 Width=504 Height=218 Visible=1 Caption="Изменение записи" Point(doVisible) } Add(Button,5898922,294,224) { Left=225 Top=125 Width=110 Height=30 Caption="Изменить запись" link(onClick,2155722:doString,[]) } Add(Edit,13959878,357,70) { Left=10 Top=80 Width=120 Text="" } Add(Label,11383187,735,182) { Left=10 Top=5 Width=30 Height=17 Caption="Дата" } Add(DSC_Exec,1872617,427,224) { DSManager="parent.mdb" link(onExec,16293946:doEvent1,[]) } Add(DatePicker,7315003,280,28) { Left=5 Top=30 Width=115 Height=21 link(onChange,15533825:doWork2,[]) } Add(Label,14589450,735,175) { Left=10 Top=60 Width=53 Height=17 Caption="Фамилия" } Add(Edit,7295256,399,77) { Left=160 Top=30 Width=310 Text="" } Add(Label,3236980,658,168) { Left=160 Top=10 Width=54 Height=17 Caption="Описание" } Add(Label,10418596,728,175) { Left=170 Top=60 Width=40 Height=17 Caption="Работа" } Add(Edit,1472904,441,84) { Left=160 Top=80 Width=310 Text="" } Add(Edit,16758460,483,84) { Left=10 Top=130 Width=120 Text="" DataType=1 } Add(Label,6925719,700,168) { Left=10 Top=110 Width=59 Height=17 Caption="Стоимость" } Add(DateConvertor,14919682,336,28) { Mode=9 Format="yyyy-MM-dd" Point(Result) Point(Data) } Add(FormatStr,2155722,350,224) { DataCount=6 Mask="UPDATE\r\n [tab1]\r\nSET\r\n [date] = '%1',\r\n [familia] = '%2',\r\n [opisanie] = '%3',\r\n [work] = '%4',\r\n [summa] = '%5'\r\nWHERE\r\n [id] = %6;\r\n" link(onFString,1872617:doExec,[]) link(Str1,14919682:Result,[(356,224)(356,208)(342,208)]) link(Str2,13959878:Text,[]) link(Str3,7295256:Text,[(370,117)(405,117)]) link(Str4,1472904:Text,[(377,124)(447,124)]) link(Str5,16758460:Text,[(384,131)(489,131)]) link(Str6,2693451:RemaindData,[(391,215)(167,215)]) } Add(Hub,16293946,476,224) { link(onEvent1,15505584:onEvent1,[(592,230)(592,69)]) link(onEvent2,1216687:doDeferredEvent,[(522,237)(522,265)]) } Add(DoData,8065789,588,259) { Data=Integer(0) link(onEventData,5362846:doEvent2,[(704,265)(704,321)(60,321)(60,76)]) } Add(DeferredEvent,1216687,532,259) { link(onDeferredEvent,8065789:doData,[]) } Add(Hub,5362846,70,63) { InCount=2 link(onEvent1,2693451:doSeparateMT,[]) link(onEvent2,8915849:doVisible,[(102,76)(102,111)]) } Add(MT_MultiData,2693451,161,63) { Count=5 Point(Data) Point(RemaindData) link(onData1,2655649:doConvert,[(200,69)(200,34)]) link(onData2,13959878:doText,[]) link(onData3,7295256:doText,[]) link(onData4,1472904:doText,[]) link(onData5,16758460:doText2,[]) link(Data,15505584:Data1,[(167,26)(27,26)]) } Add(DateConvertor,2655649,217,28) { Mode=8 Format="yyyy-MM-dd" Point(Result) Point(Data) link(onResult,2068209:doEvent1,[]) } Add(Hub,2068209,259,28) { link(onEvent1,7315003:doSetDate,[]) link(onEvent2,15533825:doWork3,[(326,41)]) } Add(HubEx,15533825,322,28) { link(onEvent,14919682:doConvert,[]) } END_SDK Add(Message,2780906,406,371) { Message="Вы уверены что хотите удалить запись" Caption="ВНимание" Type=2 Icon=1 DefButton=1 Point(onYES) link(onYES,7347893:doSplit,[]) } Add(DSC_Exec,2241594,560,378) { DSManager="mdb" link(onExec,16153839:doWork,[]) } Add(FormatStr,8646130,504,378) { Mask="DELETE\r\nFROM\r\n [tab1]\r\nWHERE\r\n [id] = %1;\r\n" link(onFString,2241594:doExec,[]) } Add(LineBreakEx,6524517,455,231) { } Add(LineBreakEx,1697710,266,168) { Type=1 link(OnEvent,12639736:doEvent2,[(291,174)(291,139)]) } Add(LineBreakEx,16153839,602,378) { } Add(MT_Part,7347893,455,378) { After=4 Point(Data) link(onSplit,8646130:doString,[]) link(Data,14576830:Var3,[(461,290)]) } Add(LineBreakEx,9679634,469,308) { } Add(GetDataEx,14576830,406,285) { Angle=3 link(Data,4626275:Select,[(146,290)]) }
Редактировалось 1 раз(а), последний 2024-09-22 05:51:17
|