sla8a писал(а):
Нужны данные до начала редактирования и в конце редактирования конкретно той ячейки которую редактируют сторонние контролы. До начала редактирования можно получить с Cell сохранив в Memory, а данные после редактирования можно получить с Memory перед внесением в ячейку doSetData.
Как по мне то onEscCell должен выдавать данные после редактирования редактированной ячейки. Это будет полезно если нужно сравнить данные до редактирования и после. Зачем нужны данные новой выбранной ячейки не понятно.
Вот такая схема нужна чтоб узнать нужно ли вносить данные в базу данных, если данные ячейки были изменены. И ложные срабатывания onEscCell вносят ненужные записи.
А почему для этих целей нельзя использовать точки onBeforeLineChange и onLineChange?
Add(MainForm,2953706,77,70)
{
link(onCreate,3682515:doConvert,[])
}
Add(MTStrTbl,7369721,77,133)
{
Width=506
Height=244
Align=5
Name="tabl"
ColorItems=0
Redaction=0
Grid=0
Point(onBeforeLineChange)
Point(onLineChange)
link(onBeforeLineChange,14558800:doLoad,[])
link(onLineChange,11731040:doEnum,[(130,174)(130,216)])
}
Add(MST_ColAction,4139610,231,84)
{
Action=9
MaxColWidth=1000
Index=-2
MSTControl="tabl"
}
Add(MST_Load,571213,182,77)
{
Delimiter="\t"
MSTControl="tabl"
link(onLoadFromStream,4139610:doColAction,[])
}
Add(StreamConvertor,3682515,133,84)
{
Mode=7
Point(Data)
link(onResult,571213:doLoadFromStream,[])
link(Data,6934679:Text,[])
}
Add(StrList,6934679,133,35)
{
Strings=#42:Item Description Quantity Unit Price Value|63:13930 Double-action Quickstart II rem. L=740mm 1 PC 98,66 98,66|53:13100201 Spray gun for udder washer 20 PC 17,77 355,4|49:13246007 COMBI-cock ш51 mm cpl. 10 PC 63,43 634,3|51:25643301 Milk hose ш 24/14 x 2750 32 PC 9,76 312,32|56:14291 Service no.1 RDS MAX double box 1 PC 250,51 250,51|54:24144638 Spiral spring for tube filter 3 PC 43,2 129,6|40:22121763 V-belt spz 1087 4 PC 5,91 23,64|61:MH0015 Repair kit non-rotating cylinder ш40mm 8 PC 14,3 114,4|48:GS9835 Revision set SAC Unipuls 4 PC 13,97 55,88|52:22121735 El-motor 3,0kw 3x400v 1400 1 PC 186,4 186,4|55:23544122 Carbon disc ш44,7/38,3x5,8mm 10 PC 16,92 169,2|55:23544122 Carbon disc ш44,7/38,3x5,8mm 10 PC 16,92 169,2|54:23544122 Carbon disc ш44,7/38,3x5,8mm 2 PC 16,92 33,84|64:21200159 Top part UNIFL3/4 for steel bot.part 25 PC 30,09 752,25|57:24400111 Hose f. pump compl. UNIWASH 153 PC 10,58 1618,74|58:13225 Piston complete for valve UNIWASH3 4 PC 27,09 108,36|60:12200105 Vacuumgauge glycerine ш100mm 3/8" 5 PC 40,57 202,85|0:|
}
Add(MT_Array,14558800,210,161)
{
}
Add(MT_Enum,11731040,140,210)
{
link(onItem,14065383:doRead,[])
}
Add(Debug,2985568,357,210)
{
LogCount=100
}
Add(ArrayRW,14065383,210,210)
{
link(onRead,357915:doCompare,[])
link(Array,14558800:Array,[])
link(Index,11731040:Index,[(223,201)(202,201)(202,250)(153,250)])
}
Add(If_else,357915,266,210)
{
link(onTrue,2985568:doEvent,[])
link(onFalse,5476614:doEvent,[(340,223)(340,244)])
link(Op2,11731040:Item,[(279,201)(258,201)(258,257)(146,257)])
}
Add(Debug,5476614,357,238)
{
LogCount=100
}