Редактировалось 2 раз(а), последний 2021-05-21 13:26:46

Какие именно цыфры уточни идут ли они по порядку или расположены случайным образом и с чем их надо сравнивать

Для этого используй свойство Data
[code:1]Add(Button,14181615,126,119) {
Left=125
Top=115
Data=String("Ура!")
link(onClick,15330307:doText,[])
}
Add(Label,15330307,189,119)
{
Left=210
Top=125
}
[/code:1]
[quote]поверх всех окон[/quote]
[code:1]Add(ChildForm,5246337,196,210) {
}
BEGIN_SDK
Add(EditMulti,2961389,3,3)
{
}
Add(MainForm,973290,77,63)
{
Left=35
Top=105
link(onCreate,4917157:doPopup,[(119,104)(119,120)(67,120)(67,146)])
}
Add(WinTools,4917157,77,133)
{
link(Handle,973290:Handle,[])
}
END_SDK
[/code:1]

Редактировалось 2 раз(а), последний 2021-05-21 13:26:47

CASPER_Y, если Вам не хочется рисовать 10 шт If_else или Case, рисуйте один VBJS:
[code:1]Add(VBJScript,3059926,406,182) {
WorkPoints=#6:doWork|
EventPoints=#8:onEvent1|8:onEvent2|
Script=#0:|27:Function doWork(Data,Index)|19: Select Case Data|13: Case "абв"|22: Sys.onEvent2 Data|13: Case "где"|22: Sys.onEvent2 Data|13: Case "жзи"|22: Sys.onEvent2 Data|13: Case "клм"|22: Sys.onEvent2 Data|13: Case "ноп"|22: Sys.onEvent2 Data|11: Case 123|22: Sys.onEvent2 Data|11: Case 456|22: Sys.onEvent2 Data|11: Case 789|22: Sys.onEvent2 Data|11: Case 234|22: Sys.onEvent2 Data|11: Case 567|22: Sys.onEvent2 Data|12: Case Else|22: Sys.onEvent1 Data|13: End Select|0:|12:End Function|
}
[/code:1] :P

Если подниматься на десятый этаж, неужели надо все 10 этажей пройти ?

Нули спереди можно добавлять так:
[code:1]Add(Label,6663774,280,49) {
Left=140
Top=35
}
Add(Edit,8625247,112,49)
{
Left=30
Top=35
link(onChange,13578351:doOperation,[(156,55)(156,55)])
}
Add(Math,13578351,168,49)
{
Op2=1000000
link(onResult,13240211:doCopy,[])
}
Add(Copy,13240211,224,49)
{
Position=2
Count=6
link(onCopy,6663774:doText,[])
}[/code:1]

CASPER_Y, а можно какой-нибудь примерчик выложить, а то я все равно не въехал, что вы хотите.

Редактировалось 2 раз(а), последний 2021-05-21 13:26:47

CASPER_Y, примерчик:
[code:1]Add(Edit,5970129,350,91) {
Left=45
Top=30
Width=135
link(onChange,5463445:doWork1,[])
}
Add(MultiElement,11170251,406,42)
{
}
BEGIN_SDK
Add(EditMulti,6561079,3,3)
{
EventCount=2
WorkCount=1
Width=580
Height=151
link(doWork1,1347607:doCase,[(12,9)(12,34)])
}
Add(Case,1347607,21,28)
{
Value=Integer(123)
link(onNextCase,53719:doCase,[])
link(onTrue,6097543:doEvent10,[(64,41)(64,132)])
}
Add(Case,53719,70,28)
{
Value=Integer(456)
link(onNextCase,513281:doCase,[])
link(onTrue,6097543:doEvent9,[(112,41)(112,125)])
}
Add(Case,513281,119,28)
{
Value=Integer(789)
link(onNextCase,13178766:doCase,[])
link(onTrue,6097543:doEvent8,[(158,41)(158,118)])
}
Add(Case,2713778,266,28)
{
Value=String(абв)
link(onNextCase,947734:doCase,[])
link(onTrue,6097543:doEvent5,[(306,41)(306,97)])
}
Add(Case,947734,315,28)
{
Value=String(где)
link(onNextCase,5495788:doCase,[])
link(onTrue,6097543:doEvent4,[(355,41)(355,90)])
}
Add(Case,5495788,364,28)
{
Value=String(жзи)
link(onNextCase,7469427:doCase,[])
link(onTrue,6097543:doEvent3,[(408,41)(408,83)])
}
Add(Case,13178766,168,28)
{
Value=Integer(234)
link(onNextCase,6965756:doCase,[])
link(onTrue,6097543:doEvent7,[(209,41)(209,111)])
}
Add(Case,6965756,217,28)
{
Value=Integer(567)
link(onNextCase,2713778:doCase,[])
link(onTrue,6097543:doEvent6,[(261,41)(261,104)])
}
Add(Case,7469427,413,28)
{
Value=String(клм)
link(onNextCase,11539616:doCase,[])
link(onTrue,6097543:doEvent2,[(454,41)(454,76)])
}
Add(Case,11539616,462,28)
{
Value=String(ноп)
link(onNextCase,6561079:onEvent1,[(538,34)(538,9)])
link(onTrue,6097543:doEvent1,[(506,41)(506,69)])
}
Add(Hub,6097543,518,63)
{
InCount=10
OutCount=1
link(onEvent1,6561079:onEvent2,[(566,69)(566,16)])
}
END_SDK
Add(Message,11081740,490,119)
{
Caption="Есть такая партия!"
}
Add(Message,16023154,483,56)
{
Caption="Этого нет!"
}
Add(ChildPanel,5463445,406,91)
{
link(onEvent1,16023154:doMessage,[(460,97)(460,62)])
link(onEvent2,11081740:doMessage,[(464,104)(464,125)])
}
BEGIN_SDK
Add(EditMulti,10589189,3,3)
{
EventCount=2
WorkCount=1
link(doWork1,9671119:doValue,[(54,9)(54,20)])
}
Add(Panel,10837853,14,14)
{
Left=35
Top=105
Visible=1
Point(doColor)
}
Add(Memo,12998537,35,63)
{
Left=195
Top=105
Strings=#3:123|3:456|3:789|3:234|3:567|3:абв|3:где|3:жзи|3:клм|3:ноп|
}
Add(ArrayEnum,2747743,49,154)
{
link(onItem,10054741:doCompare,[(89,160)(89,104)])
link(onEndEnum,7391974:doEvent1,[])
link(Array,12998537:Array,[])
}
Add(Memory,9671119,105,14)
{
link(onData,2747743:doEnum,[(145,20)(145,50)(14,50)(14,160)])
}
Add(If_else,10054741,98,98)
{
link(onTrue,14562969:doEvent1,[(145,104)(145,104)])
link(Op2,11831012:Data1,[])
}
Add(Hub,14562969,147,98)
{
link(onEvent1,10589189:onEvent2,[(241,104)(241,16)])
link(onEvent2,284190:doNext,[])
}
Add(Counter,284190,196,105)
{
}
Add(If_else,3449020,196,161)
{
Op2=Integer(0)
link(onTrue,15371025:doData,[])
link(Op1,284190:Count,[])
}
Add(GetData,11831012,105,56)
{
link(Data,9671119:Value,[])
}
Add(DoData,15371025,245,161)
{
link(onEventData,10589189:onEvent1,[(290,167)(290,9)])
link(Data,11831012:Data2,[(251,95)(118,95)])
}
Add(Hub,7391974,105,161)
{
link(onEvent1,3449020:doCompare,[])
link(onEvent2,284190:doReset,[(185,174)(185,125)])
}
END_SDK
Add(VBJScript,3059926,406,140)
{
WorkPoints=#6:doWork|
EventPoints=#8:onEvent1|8:onEvent2|
Script=#0:|27:Function doWork(Data,Index)|19: Select Case Data|13: Case "абв"|22: Sys.onEvent2 Data|13: Case "где"|22: Sys.onEvent2 Data|13: Case "жзи"|22: Sys.onEvent2 Data|13: Case "клм"|22: Sys.onEvent2 Data|13: Case "ноп"|22: Sys.onEvent2 Data|11: Case 123|22: Sys.onEvent2 Data|11: Case 456|22: Sys.onEvent2 Data|11: Case 789|22: Sys.onEvent2 Data|11: Case 234|22: Sys.onEvent2 Data|11: Case 567|22: Sys.onEvent2 Data|12: Case Else|22: Sys.onEvent1 Data|13: End Select|0:|12:End Function|
}
[/code:1]

Если я правильно понял то вот:
[code:1]Add(MainForm,6330777,35,63) {
Left=20
Top=105
Width=230
Height=87
Caption="CS CD-ROM the Manager"
BorderStyle=3
}
Add(Button,16248532,112,161)
{
Left=120
Top=25
Width=95
Caption="Закрыть дверцу"
link(onClick,12626224:doClose,[(152,167)(124,167)])
}
Add(CDROM,12626224,182,154)
{
}
Add(Button,15496296,112,112)
{
Left=10
Top=25
Width=100
Caption="Открыть дверцу"
link(onClick,12626224:doOpen,[(163,118)(163,160)])
}
Add(ChangeMon,11440437,182,224)
{
link(onData,9999007:doEvent,[])
link(Data,12626224:isCDInside,[])
}
Add(Label,7503485,392,231)
{
Left=20
Top=5
Width=185
}
Add(DoData,12138169,315,231)
{
Data=String(Диск вставлен)
link(onEventData,11291893:doWork2,[])
}
Add(Timer,13915770,112,224)
{
Interval=500
link(onTimer,11440437:doData,[])
}
Add(IndexToChanel,9999007,245,224)
{
Point(Index)
link(onEvent1,3077162:doData,[(296,230)(296,188)])
link(onEvent2,12138169:doData,[])
}
Add(HubEx,11291893,364,224)
{
link(onEvent,7503485:doText,[])
}
Add(DoData,3077162,315,182)
{
Data=String(Диск отсутвует)
link(onEventData,11291893:doWork1,[(368,188)])
}
[/code:1]

Редактировалось 2 раз(а), последний 2021-05-21 13:26:47

Редактировалось 2 раз(а), последний 2021-05-21 13:26:48

Очистить редактор текста

Редактировалось 2 раз(а), последний 2021-05-21 13:26:48

Ну и в чем разница
Если хочешь, чтобы очистился <Объект "текст"> - очисти его