Вверх ↑
Этот топик читают: Гость
Ответов: 207
Рейтинг: 14
#1: 2020-07-10 14:51:31 ЛС | профиль | цитата
Не могу понять, как редактировать ячейки в mtstrtbl по координатам. Типа матрица строк, только для записи

Add(MainForm,314817,280,154)
{
Width=421
Height=278
Caption=""
Position=1
link(onCreate,10041622:doEnum,[])
}
Add(MST_UseEditCtrl,3498945,336,259)
{
DblClick=1
MSTControl="MtS_tbl"
PColor(onCellSize,8421440)
PColor(onEscCell,32768)
}
Add(StrList,15034837,343,112)
{
Strings=#15:sdfsdf;aaaaa;;0|15:fzsdfzs;bbbb;;3|14:sdfszz;cccc;;2|15:sdfszz;ddddd;;0|15:sdfszz;eeeee;;1|0:|
}
Add(MT_String,922736,413,154)
{
link(onResult,2904434:doRowAction,[])
}
Add(ArrayEnum,10041622,357,168)
{
link(onItem,922736:doMTString,[])
link(Array,15034837:Array,[])
}
Add(MST_RowAction,2904434,490,154)
{
MSTControl="MtS_tbl"
}
Add(MTStrTbl,9842821,196,147)
{
Width=400
Height=195
Font=[MS Sans Serif,12,0,0,1]
Name="MtS_tbl"
Columns=#1:1|1:2|1:3|1:4|
ColumnWidth=90
Point(Row)
Point(Col)
}
Add(Button,4947584,273,259)
{
Left=10
Top=215
Data=String(11123)
link(onClick,3498945:doSetData,[])
}
карма: 2

0
Ответов: 263
Рейтинг: 18
#2: 2020-07-10 15:18:08 ЛС | профиль | цитата
Так?

Add(MainForm,314817,245,154)
{
Width=421
Height=278
Caption=""
link(onCreate,10041622:doEnum,[])
}
Add(MST_UseEditCtrl,3498945,273,287)
{
MSTControl="MtS_tbl"
PColor(onCellSize,8421440)
PColor(onEscCell,32768)
link(onCellSize,4674596:doSeparateMT,[])
link(onEnterCell,16046716:doEvent1,[(336,300)(336,314)])
link(onEscCell,2308449:doSendToBack,[(329,307)(329,328)])
}
Add(StrList,15034837,308,112)
{
Strings=#15:sdfsdf;aaaaa;;0|15:fzsdfzs;bbbb;;3|14:sdfszz;cccc;;2|15:sdfszz;ddddd;;0|15:sdfszz;eeeee;;1|0:|
}
Add(MT_String,922736,378,154)
{
link(onResult,2904434:doRowAction,[])
}
Add(ArrayEnum,10041622,322,168)
{
link(onItem,922736:doMTString,[])
link(Array,15034837:Array,[])
}
Add(MST_RowAction,2904434,455,154)
{
MSTControl="MtS_tbl"
}
Add(MTStrTbl,9842821,161,147)
{
Width=400
Height=195
Font=[MS Sans Serif,12,0,0,1]
Name="MtS_tbl"
Columns=#1:1|1:2|1:3|1:4|
ColumnWidth=90
Point(Row)
Point(Col)
}
Add(Edit,2308449,553,273)
{
Top=-20
Height=16
Font=[MS Sans Serif,12,0,0,1]
Point(doLeft)
Point(doTop)
Point(doWidth)
Point(doHeight)
Point(doBringToFront)
Point(doSendToBack)
link(onChange,3498945:doSetData,[(600,279)(600,252)(261,252)(261,293)])
}
Add(MT_MultiData,4674596,462,287)
{
@Hint=#25:Положение и ширина ячейки|
Count=4
Point(Data)
link(onData1,2308449:doLeft,[])
link(onData2,2308449:doTop,[])
link(onData3,2308449:doWidth,[])
link(onData4,2308449:doHeight,[])
}
Add(Hub,16046716,357,308)
{
link(onEvent1,291971:doData,[(381,314)(381,286)])
link(onEvent2,2308449:doBringToFront,[])
}
Add(DoData,291971,406,280)
{
link(onEventData,2308449:doText2,[])
link(Data,3498945:Cell,[(412,266)(316,266)(316,331)(300,331)])
}
карма: 3

0
Ответов: 207
Рейтинг: 14
#3: 2020-07-10 15:37:01 ЛС | профиль | цитата
fox-video, Спасибо, но немного не так. Нужно редактировать по входным координатам (например x=1; y=1) без выделения мышкой.
На MST_UseEditCtrl можно не обращать внимания. Просто не знаю, как правильно сделать.

Редактировалось 1 раз(а), последний 2020-07-10 15:39:01
карма: 2

0
Ответов: 263
Рейтинг: 18
#4: 2020-07-10 15:53:15 ЛС | профиль | цитата
Тогда так

Add(MainForm,314817,343,112)
{
Width=421
Height=278
Caption=""
link(onCreate,10041622:doEnum,[])
}
Add(StrList,15034837,406,70)
{
Strings=#15:sdfsdf;aaaaa;;0|15:fzsdfzs;bbbb;;3|14:sdfszz;cccc;;2|15:sdfszz;ddddd;;0|15:sdfszz;eeeee;;1|0:|
}
Add(MT_String,922736,476,112)
{
link(onResult,2904434:doRowAction,[])
}
Add(ArrayEnum,10041622,420,126)
{
link(onItem,922736:doMTString,[])
link(Array,15034837:Array,[])
}
Add(MST_RowAction,2904434,553,112)
{
MSTControl="MtS_tbl"
}
Add(MTStrTbl,9842821,259,105)
{
Width=400
Height=195
Font=[MS Sans Serif,12,0,0,1]
Name="MtS_tbl"
Columns=#1:1|1:2|1:3|1:4|
ColumnWidth=90
Point(Row)
Point(Col)
}
Add(Edit,15562831,378,259)
{
Left=10
Top=205
Width=100
Text="Текст"
}
Add(Label,6240363,469,211)
{
Left=190
Top=205
Width=40
Height=17
Caption="Строка"
}
Add(Edit,6880488,469,258)
{
Left=235
Top=205
Width=45
Text="0"
}
Add(Label,5814044,427,210)
{
Left=290
Top=205
Width=46
Height=17
Caption="Столбец"
}
Add(Edit,5430516,427,259)
{
Left=340
Top=205
Text="0"
}
Add(Button,12875858,224,343)
{
Left=120
Top=205
Width=60
Caption="Записать"
link(onClick,11495188:doWrite,[])
}
Add(MST_Matrix,7432156,336,259)
{
MSTControl="MtS_tbl"
}
Add(MatrixRW,11495188,371,336)
{
link(Matrix,7432156:Matrix,[(377,314)(342,314)])
link(Value,15562831:Text,[])
link(X,5430516:Text,[(391,314)(433,314)])
link(Y,6880488:Text,[(398,313)(475,313)])
}
карма: 3

1
Голосовали:Joiner
Ответов: 207
Рейтинг: 14
#5: 2020-07-10 15:58:48 ЛС | профиль | цитата
fox-video, То, что нужно.
карма: 2

1
Голосовали:flint2
Ответов: 2059
Рейтинг: 132
#6: 2020-07-10 17:25:14 ЛС | профиль | цитата
Наверное не так поставил - прощайте пьяницу - промахнулся, а может и нет!
Joiner, я тебе потом буду ставить - если захочешь, каждый день.
Неужели у хозяина сайта не хватает ума, чтобы эти гадкие замашки 90-ых убрать?
Всё течёт, всё изменяется!
Нельзя в одной луже стоять по колено в воде. Один брод не пошёл, другой надо нащупывать.
Всё будет хорошо!
карма: 6

0
Ответов: 207
Рейтинг: 14
#7: 2020-07-10 22:42:06 ЛС | профиль | цитата
flint2, Иногда складывается такое впечатление, что Вы очень преуспели в создании своей лингвистической нейросети.
Она уже пишет не только сценарии для игр, но и сообщения на форуме.
карма: 2

1
Голосовали:sla8a
7
Сообщение
...
Прикрепленные файлы
(файлы не залиты)