Вверх ↑
Этот топик читают: Гость
Ответов: 20
Рейтинг: 0
#1: 2013-05-27 15:19:10 ЛС | профиль | цитата
Доброго времени суток. Не могу разобраться со счетчиками. Надо чтобы на форме было два табло, одно показывает дату и время, на другом часы и минуты. Причем минуты должны показывать только 0 или 30 мин., т.е. минуты должны переключаться через каждые пол часа. code_31114.txt
карма: 1

0
файлы: 1code_31114.txt [886B] [142]
Ответов: 9906
Рейтинг: 351
#2: 2013-05-27 15:47:13 ЛС | профиль | цитата

Add(MainForm,8911780,287,161)
{
Width=593
Height=146
link(onCreate,1309264:doWork3,[(347,181)])
}
Add(Timer,45619,287,112)
{
Interval=500
link(onTimer,1309264:doWork2,[])
}
Add(Time,44177,637,42)
{
Format="D-M-Y"
Point(Hours)
Point(Minute)
Point(Second)
}
Add(Edit,10026432,588,112)
{
Left=360
Top=28
Width=200
Height=53
Color=-16777201
Font=[Lucida Console,36,1,8421376,204]
TabOrder=-1
WinStyle=4
Text=""
Alignment=2
ReadOnly=0
link(onChange,16206019:doData,[])
}
Add(Edit,7287073,686,112)
{
Left=24
Top=28
Width=326
Height=53
Color=-16777201
Font=[Lucida Console,36,1,8421376,204]
TabOrder=-1
WinStyle=4
Text=""
Alignment=2
ReadOnly=0
}
Add(Switch,2983428,371,112)
{
DataOn=String( )
DataOff=String(:)
Point(State)
link(onSwitch,8675865:doOperation,[])
}
Add(FormatStr,10638597,532,112)
{
DataCount=3
Mask="%3%2%1"
link(onFString,10026432:doText,[])
link(Str2,2983428:State,[(545,103)(524,103)(524,152)(377,152)])
link(Str3,44177:Hours,[(552,89)(650,89)])
}
Add(HubEx,1309264,343,112)
{
link(onEvent,2983428:doSwitch,[])
}
Add(Math,8675865,420,112)
{
OpType=37
Op2=30
ResultType=0
link(onResult,13540269:doConvert,[])
link(Op1,44177:Minute,[(426,96)(657,96)])
}
Add(Convertor,13540269,476,112)
{
SymbolFill="0"
link(onResult,10638597:doString,[])
}
Add(ChangeMon,16206019,637,112)
{
link(onData,7287073:doText,[])
link(Data,44177:FormatTime,[])
}
карма: 9

0
Ответов: 20
Рейтинг: 0
#3: 2013-05-28 15:10:12 ЛС | профиль | цитата
Спасибо
карма: 1

0
3
Сообщение
...
Прикрепленные файлы
(файлы не залиты)