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)])
}
|
Схема
Поиск
Друзья
Администрация