Вверх ↑
Этот топик читают: Гость
Ответов: 574
Рейтинг: 1
#16: 2006-09-14 23:03:51 ЛС | профиль | цитата
А компоненты есть для этого! Почему не пользоваться?
карма: 0

0
Ответов: 574
Рейтинг: 1
#17: 2006-09-14 23:07:19 ЛС | профиль | цитата
Вот: http://csoft.ucoz.ru/load/11-1-0-108

(тег "url" когда-нибудь будет работать? )
карма: 0

0
Ответов: 3655
Рейтинг: 69
#18: 2006-09-14 23:07:26 ЛС | профиль | цитата

карма: 0

0
Ответов: 9906
Рейтинг: 351
#19: 2006-09-14 23:15:06 ЛС | профиль | цитата
CASPER, это специально против спамеров. Как видишь - срабатывает
Ибо, настоящий спамер форума не читает
карма: 9

0
Ответов: 16884
Рейтинг: 1239
#20: 2006-09-15 08:59:46 ЛС | профиль | цитата
Леонид, та тема тю-тю. Выкладывайте по новой.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 9906
Рейтинг: 351
#21: 2006-09-15 09:07:12 ЛС | профиль | цитата
Не "тю-тю", а удалена по просьбам трудящихся
((грубо говоря - автора топика))
карма: 9

0
Ответов: 8926
Рейтинг: 823
#22: 2006-09-15 10:59:24 ЛС | профиль | цитата
Tad писал(а):
Леонид, та тема тю-тю. Выкладывайте по новой.

Выкладываю, только ту схему не сохранил, пришлось рисовать снова Ntl-M, смотрите, пока не было просьб трудящихся
Add(ChildPanel,13391663,217,119)
{
link(onEvent1,9625793:doText,[])
}
BEGIN_SDK
Add(EditMulti,3993349,3,3)
{
EventCount=1
VarCount=1
Width=783
Height=277
link(Var1,9257491:Value,[(9,258)(741,258)])
}
Add(Panel,5433913,14,140)
{
Left=45
Top=20
Width=64
Height=27
Point(doColor)
}
Add(Edit,225656,182,63)
{
Left=2
Top=2
Width=60
Height=25
Font=[MS Sans Serif,14,1,0,1]
Text="00:00"
Point(doPosition)
Point(doSelectLength)
Point(onSetFocus)
link(onChange,9306923:doNext,[(228,69)(228,209)])
link(onEnter,6599688:doCompare,[])
link(onSetFocus,840117:doTimer,[(222,83)(222,223)])
}
Add(Hub,1942049,28,28)
{
InCount=2
OutCount=1
link(onEvent1,3581662:doData,[])
}
Add(Edit,315877,406,147)
{
Left=-100
Top=-100
Point(doSetFocus)
}
Add(Hub,4302751,350,77)
{
OutCount=4
link(onEvent1,12095059:doValue,[])
link(onEvent2,4071134:doSplit,[])
link(onEvent3,702837:doCompare,[(401,97)(401,139)])
link(onEvent4,315877:doSetFocus,[(394,104)(394,167)])
}
Add(Hub,10138963,294,217)
{
link(onEvent1,9306923:doReset,[(338,223)(331,223)])
link(onEvent2,13807420:doEvent1,[(335,230)(335,223)(61,223)(61,83)])
}
Add(Hub,13807420,77,77)
{
InCount=2
link(onEvent1,225656:doPosition,[])
link(onEvent2,16231357:doData,[])
}
Add(DoData,16231357,133,84)
{
Data=Integer(1)
link(onEventData,225656:doSelectLength,[])
}
Add(StrMask,6599688,238,70)
{
Mask="##:##"
link(onFalse,9025802:doMessage,[(282,76)(282,41)])
link(onTrue,2329388:doValue,[])
}
Add(Counter,9306923,350,203)
{
Max=3
link(onNext,10620314:doEvent,[])
}
Add(Timer,840117,238,217)
{
Interval=65
Enable=1
AutoStop=1
link(onTimer,10138963:doEvent1,[])
}
Add(Memory,2329388,294,77)
{
link(onData,4302751:doEvent1,[])
}
Add(ChanelToIndex,6846458,462,203)
{
Count=5
link(onIndex,13807420:doEvent2,[(500,209)(500,192)(67,192)(67,90)])
}
Add(IndexToChanel,10620314,406,203)
{
Count=4
link(onEvent1,6846458:doWork1,[])
link(onEvent2,6846458:doWork2,[])
link(onEvent3,6846458:doWork4,[(453,223)(453,230)])
link(onEvent4,6846458:doWork5,[(446,230)(446,237)])
}
Add(Message,9025802,294,35)
{
Caption="Формат ЧЧ:ММ"
link(onMessage,1942049:doEvent1,[(336,41)(336,18)(18,18)(18,34)])
}
Add(StrPart,4071134,406,84)
{
Char=":"
link(onSplit,13001165:doConvert,[(450,90)(450,48)])
link(onPart,15568479:doConvert,[])
}
Add(If_else,5172023,518,42)
{
Type=1
Op2=Integer(60)
link(onFalse,9136259:doEvent1,[(562,55)(562,97)])
}
Add(If_else,13616375,518,91)
{
Type=1
Op2=Integer(24)
link(onFalse,9136259:doEvent2,[])
}
Add(Convertor,13001165,462,42)
{
Mode=1
link(onResult,5172023:doCompare,[])
}
Add(Convertor,15568479,462,91)
{
Mode=1
link(onResult,13616375:doCompare,[])
}
Add(Hub,9136259,574,91)
{
InCount=2
OutCount=1
link(onEvent1,12095059:doClear,[(614,97)(614,90)])
}
Add(Memory,12095059,623,77)
{
Default=Integer(-1)
}
Add(If_else,702837,623,133)
{
Op2=Integer(-1)
link(onTrue,6199163:doMessage,[])
link(onFalse,13005993:doEvent1,[(670,146)(670,209)])
link(Op1,12095059:Value,[])
}
Add(Message,6199163,679,133)
{
Caption="Max 23:59"
link(onMessage,1942049:doEvent2,[(720,139)(720,10)(10,10)(10,41)])
link(Message,2329388:Value,[(685,127)(300,127)])
}
Add(DoData,3581662,77,28)
{
Data=String(00:00)
link(onEventData,2852865:doEvent1,[])
}
Add(Memory,9257491,735,203)
{
link(onData,3993349:onEvent1,[(776,209)(776,9)])
}
Add(Hub,2852865,126,28)
{
InCount=2
OutCount=1
link(onEvent1,225656:doText2,[(170,34)(170,76)])
}
Add(Hub,13005993,679,203)
{
link(onEvent1,9257491:doValue,[])
link(onEvent2,2852865:doEvent2,[(723,216)(723,184)(116,184)(116,41)])
}
END_SDK
Add(Edit,9625793,273,119)
{
Left=135
Top=25
link(onChange,10333297:doText,[(315,125)(315,162)(263,162)(263,188)])
}
Add(Edit,10333297,273,182)
{
Left=50
Top=70
link(Str,13391663:Var1,[(279,167)(223,167)])
}
карма: 19

0
Главный модератор
Ответов: 2999
Рейтинг: 396
#23: 2006-09-15 11:11:11 ЛС | профиль | цитата
Кто-то кому-то обещал тэги CODE ставить на отдельной строке.
карма: 6
Дорогу осилит идущий. Install/Update HiAsm.NET
0
Ответов: 8926
Рейтинг: 823
#24: 2006-09-15 11:15:12 ЛС | профиль | цитата
Galkov, Nic, ей-богу, "не виновата я", код №261 сам сюда пришёл! наверное из удалённой темы, хотя указанный размер не его, при попытке исправить мой код не свернулся в ссылку ???
карма: 19

0
Гость
Ответов: 17029
Рейтинг: 0
#25: 2006-09-15 11:45:53 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-21 12:16:23
карма: 0

0
Ответов: 8926
Рейтинг: 823
#26: 2006-09-15 14:32:57 ЛС | профиль | цитата
Tad, , спасибо Galkov-у, наверное он исправил.
карма: 19

0
Ответов: 574
Рейтинг: 1
#27: 2006-09-15 18:36:10 ЛС | профиль | цитата
Galkov писал(а):
CASPER, это специально против спамеров. Как видишь - срабатывает
Ибо, настоящий спамер форума не читает


Ну так а чего Dilm'е не сделать этот тег для советиков хотя бы?
карма: 0

0
Ответов: 9906
Рейтинг: 351
#28: 2006-09-15 19:43:17 ЛС | профиль | цитата
CASPER, ты разве не видишь работающих ссылок на форуме

Если тебе Советник имя, имя крепи делами своими
карма: 9

0
Ответов: 3655
Рейтинг: 69
#29: 2006-09-15 21:29:23 ЛС | профиль | цитата
CASPER, http://hiasm.hexshock.com/xf/topic.php?t=6603&start=15Чё то ну как ни пробовал ну всё время работают.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#30: 2006-09-15 21:51:50 ЛС | профиль | цитата
Вячеслав писал(а):
CASPER, http://hiasm.hexshock.com/xf/topic.php?t=6603&start=15Чё то ну как ни пробовал ну всё время работают.

http://hiasm.hexshock.com/xf/topic.php?p=34755#P34755 и правда работает
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)