Вверх ↑
Ответов: 29
Рейтинг: 5
#1: 2017-01-08 15:47:59 ЛС | профиль | цитата
Добрый вечер. Почему в данном примере, года (те в которых 1 января приходится на понедельник) не закидываются в ListBox?
Спасибо за внимание.

Make(webapp)
Add(MainForm,1,42,28)
{
}
Add(NumberEdit,2,126,77)
{
Left=122
Top=35
Width=#2:57|
Number=2017
Min=1900
Max=3000
}
Add(For,3,147,140)
{
link(onEvent,5:doString,[])
link(End,2:Number,[(153,125)(132,125)])
link(Start,11:Number,[(160,125)(174,125)])
}
Add(ListBox,7,518,140)
{
Left=203
Top=35
Width=#3:113|
Height=#3:212|
PInfo(Str,2,года, в которых 1 января приходится на понедельник)
link(Str,36:Var3,[(524,102)])
}
Add(Button,8,455,154)
{
Left=56
Top=133
Width=#2:59|
Caption=#8:Очистить|
link(onClick,7:doText,[(503,160)(503,153)])
}
Add(Button,10,77,140)
{
Left=56
Top=91
Caption=#5:Старт|
link(onClick,3:doFor,[])
}
Add(NumberEdit,11,168,77)
{
Left=56
Top=35
Number=1990
Min=1990
Max=3000
}
Add(FormatStr,5,245,140)
{
DataCount=3
Mask=#8:%3.00.01|
@Comment=#10:ГГГГ.ММ.ДД|
AddHint(-20,46,0,0,@Comment)
link(onFString,31:doWork1,[])
link(Str3,36:Var2,[])
}
Add(If_else,4,371,140)
{
Op2=Real(1)
@Comment=#18:только понедельник|
AddHint(-45,49,0,0,@Comment)
link(onTrue,7:doAdd,[])
}
Add(Inline,31,301,140)
{
WorkCount=1
EventCount=1
Code=#25:doWork1: function(data) {|28: let arrD = data.split('.');|53: let birthDate = new Date(arrD[0], arrD[1], arrD[2]);|36: this.onEvent1(birthDate.getDay());|1:}|
@Comment=#22:Определяем день недели|
AddHint(-62,80,0,0,@Comment)
link(onEvent1,4:doCompare,[])
}
Add(GetDataEx,36,259,95)
{
Angle=3
link(Data,3:Position,[(215,102)(215,181)(153,181)])
}
карма: 2
Windows 10 64-bit, Yandex.браузер
0