Вверх ↑
Ответов: 885
Рейтинг: 190
#1: 2025-03-20 20:44:31 ЛС | профиль | цитата
tig-rrr писал(а):
Первостепенная задача — как в самой программе организовать настройки с подсказками, с возможностью их изменять,

Если внешний контрол только Edit то схему можно немного упростить.

Add(MainForm,15443588,63,77)
{
Width=453
Height=525
link(onCreate,3682515:doConvert,[])
}
Add(MTStrTbl,15391708,371,161)
{
Width=437
Height=486
Align=5
Font=[Consolas,12,0,0,204]
Name="tabs"
Columns=#16:Параметры=200==0|13:Ед.изм.=60==0|14:Значение=65==0|7:ID=0==0|13:Описание=0==0|0:|
Redaction=0
Point(ItemAtPos)
Point(Handle)
Point(onBeforeLineChange)
Point(onMouseMove)
Point(doHint)
link(onBeforeLineChange,103913:doDeferredEvent,[])
link(onMouseMove,14277450:doData,[(424,202)(424,153)(46,153)(46,174)])
}
Add(MST_Load,571213,161,84)
{
ColNameHeader=1
MSTControl="tabs"
}
Add(StreamConvertor,3682515,112,91)
{
Mode=7
Point(Data)
link(onResult,571213:doLoadFromStream,[])
link(Data,6805838:Text,[])
}
Add(StrList,6805838,112,42)
{
Strings=#27: COM PORT ;№;3;1;Номер |81:-----------------------------------------------;------------;------------;0; |14:Значения ;;;0;|28: aaa;mm;-11;1;описание 1|27: bbb;mm;22;1;описание 2|27: ccc;mm;33;1;описание 3|28: ddd;mm;-44;1;описание 4|28: eee;pix;55;1;описание 5|28: fff;pix;66;1;описание 6|28: ggg;pix;77;1;описание 7|28: hhh;pix;88;1;описание 8|81:-----------------------------------------------;------------;------------;0; |14:Настройка;;;0;|28: aaa;mm;-11;1;описание 9|28: bbb;mm;22;1;описание 10|28: ccc;mm;33;1;описание 11|29: ddd;mm;-44;1;описание 12|81:-----------------------------------------------;------------;------------;0; |18:Коррекция "0";;;0;|27: aaa;mm;0;1;описание 13|34: bbb;mm;0;1;описание 14 |76:-----------------------------------------------;------------;------------;0;|14: 2;a;2;1;1|15: 3;b;3;1; 2|16: 4;c;4;1; 3|17: 5;d;5;1; 4|18: 6;e;6;1; 5|19: 7;f;7;1; 6|20: 8;g;8;1; 7|21: 9;h;9;1; 8|22: 0;i;0;1; 9|30:50 пунктов;…..;9999;1;описание|
}
Add(WinEnum,11821637,567,168)
{
Point(onEnumChildWindows)
Point(doEnumChildWindows)
Point(ParentHandle)
link(onEnumChildWindows,10525174:doCompare,[])
link(ParentHandle,6772219:Var1,[(580,152)(454,152)])
}
Add(If_else,10525174,616,182)
{
Op1=String(obj_EDIT)
link(onTrue,14734213:doSeparateMT,[])
}
Add(DeferredEvent,103913,483,189)
{
link(onDeferredEvent,2188426:doEvent1,[])
}
Add(WinTools,10447454,749,252)
{
Point(doEnable)
link(Handle,8284748:Value3,[])
}
Add(DoData,9463857,805,182)
{
Data=Integer(0)
link(onEventData,1520024:doWork1,[(844,188)(844,223)(697,223)])
}
Add(DoData,13878952,644,245)
{
Data=Integer(1)
link(onEventData,1520024:doWork2,[])
}
Add(Hub,2188426,532,189)
{
link(onEvent1,11821637:doEnumChildWindows,[])
link(onEvent2,13878952:doData,[(557,202)(557,251)])
}
Add(HubEx,1520024,693,245)
{
link(onEvent,3852020:doEvent1,[])
}
Add(Hub,3852020,707,245)
{
link(onEvent1,10447454:doEnable,[(732,251)(732,286)])
link(onEvent2,10447454:doVisible,[])
}
Add(BaloonToolTips,2651426,315,280)
{
link(Handle,6772219:Var2,[(321,271)(454,271)])
link(Text,12473834:Value,[])
}
Add(DoData,14277450,56,168)
{
link(onEventData,7302904:doData,[])
link(Data,15391708:ItemAtPos,[(62,159)(363,159)(363,222)(405,222)])
}
Add(MST_Matrix,60719,231,168)
{
X=-1
MSTControl="tabs"
link(onEMatrix,5212203:doSeparateMT,[])
}
Add(MT_MultiData,5212203,273,168)
{
From=4
Count=1
link(onData1,12473834:doValue,[])
}
Add(Memory,12473834,322,168)
{
link(onData,15391708:doHint,[])
}
Add(Timer,16274757,245,294)
{
Interval=100
Enable=1
AutoStop=30
Point(onStop)
link(onTimer,2651426:doShow,[])
link(onStop,6492993:doWork3,[(294,307)])
}
Add(ChangeMon,7302904,105,168)
{
link(onData,8381473:doEvent1,[])
}
Add(Hub,8381473,154,168)
{
OutCount=4
link(onEvent1,60719:doEMatrix,[])
link(onEvent2,6492993:doWork1,[(207,181)(207,230)(294,230)])
link(onEvent3,2651426:doCreate,[(200,188)(200,286)])
link(onEvent4,16274757:doTimer,[(193,195)(193,300)])
}
Add(GetDataEx,6772219,448,217)
{
Angle=3
link(Data,15391708:Handle,[(412,222)])
}
Add(HubEx,6492993,290,287)
{
link(onEvent,2651426:doDestroy,[])
}
Add(MT_MultiData,14734213,672,182)
{
From=1
Count=1
link(onData1,8284748:doValue,[])
}
Add(MemFIFO,8284748,735,182)
{
Count=5
link(onData,9463857:doData,[])
}

карма: 18

0