Вверх ↑
Ответов: 495
Рейтинг: 163
#1: 2021-09-12 23:55:10 ЛС | профиль | цитата
Serascer писал(а):
У меня такой вопрос. Можете подсказать как сделать добавление текста в FormatSTR и далее в MEMO с помощью CheckBox. Т.е. есть несколько флажков например USB, USB 3.2, Type-C и так далее. Нужно ставить галочку напротив каждого из нужных и этот текст добавляется. Объясню для чего это нужно: есть внешние накопители ССД или жесткие диски с несколькими портами. И в описании товара нужно их перечислить. Я могу сделать это просто с ComboBox, но это не всегда удобно, проще галочки поставить )

Serascer, Ещё один вариант
Пример 2


Add(ChildPanel,11540617,238,84)
{
link(onEvent1,16717496:doText,[])
}
BEGIN_SDK
Add(EditMulti,16735778,21,21)
{
EventCount=1
WorkCount=1
Width=566
Height=361
VOffset=70
link(doWork1,3289887:doEnum,[])
}
Add(Panel,10362096,231,140)
{
Left=15
Top=20
Width=160
Height=22
BorderWidth=0
BevelWidth=0
Point(doHeight)
}
Add(MTStrTbl,13193754,84,140)
{
Width=160
Height=22
Align=5
Font=[Arial,9,0,0,204]
Name="TAB0"
Columns=#15:Выбор диска=138|
ColumnClick=1
ColorItems=0
CheckBoxes=0
Grid=0
Point(onMouseDown)
link(onColumnClick,7944574:doFor,[(132,153)(132,209)])
AddHint(-11,94,42,13,Name)
}
Add(StrList,1162954,168,35)
{
Strings=#3:USB|5:USB 2|7:USB 3.2|6:Type-C|46:1111111111111111111111111111111111111111111111|5:22222|5:33333|46:7777777777777777777777777777777777777777777777|
Point(onGetString)
Point(doGetString)
}
Add(MST_RowAction,9085956,287,77)
{
MSTControl="TAB0"
}
Add(MT_String,15768347,231,77)
{
link(onResult,9085956:doRowAction,[])
}
Add(ArrayEnum,3289887,182,91)
{
link(onItem,15768347:doMTString,[])
link(Array,1162954:Array,[])
}
Add(MST_CheckBoxes,7749493,280,203)
{
MSTControl="TAB0"
link(Mode,10047104:Value,[])
}
Add(MT_Enum,15422557,287,273)
{
PColor(MT,255)
link(onItem,4301875:doChkEMatrix,[])
link(onEndEnum,3120253:doData,[(335,286)(335,328)])
link(MT,7749493:AllCheck,[])
}
Add(MST_Matrix,4301875,343,266)
{
X=-1
MSTControl="TAB0"
Point(doChkEMatrix)
link(onEMatrix,3672772:doStr,[])
}
Add(MT_String,3672772,399,266)
{
link(onResult,3239822:doStrCat,[])
}
Add(Hub,11532305,245,245)
{
link(onEvent1,7121245:doClear,[(492,251)(492,279)])
link(onEvent2,15422557:doEnum,[(277,258)(277,279)])
}
Add(StrCat,7121245,504,266)
{
Point(doClear)
link(Str1,12868434:Var3,[(510,257)(558,257)(558,310)])
}
Add(DoData,3120253,504,322)
{
link(onEventData,16735778:onEvent1,[(573,328)(573,97)])
link(Data,12868434:Var2,[])
}
Add(GetDataEx,12868434,504,305)
{
link(Data,7121245:Result,[])
}
Add(StrCat,3239822,448,266)
{
Str2="; "
Point(doClear)
link(onStrCat,7121245:doStrCat,[])
}
Add(Switch,14569566,175,147)
{
DataOn=Integer(200)
DataOff=Integer(22)
Point(onOn)
Point(onOff)
link(onSwitch,10362096:doHeight,[])
link(onOff,11532305:doEvent1,[(221,167)(221,251)])
}
Add(Memory,10047104,287,140)
{
Default=Integer(0)
}
Add(For,7944574,238,203)
{
link(onEvent,7749493:doCheckBox,[])
link(End,13193754:Count,[(251,187)(104,187)])
}
Add(Switch,12421892,42,49)
{
DataOn=String(4)
DataOff=String(6)
link(onSwitch,13807484:doCaption,[])
}
Add(Hub,5569828,126,49)
{
link(onEvent1,14569566:doSwitch,[(158,55)(158,153)])
link(onEvent2,12421892:doSwitch,[(148,62)(148,37)(29,37)(29,55)])
}
Add(Button,13807484,84,49)
{
Left=140
Top=2
Width=18
Height=18
Font=[Webdings,10,0,0,2]
Caption="6"
Point(doCaption)
link(onClick,5569828:doEvent1,[])
}
END_SDK
Add(MainForm,6728510,182,70)
{
Top=2
Width=615
Height=288
Position=1
link(onCreate,11540617:doWork1,[])
}
Add(Memo,16717496,294,63)
{
Left=190
Top=15
Width=405
Height=165
}

карма: 4

0