Вверх ↑
Ответов: 793
Рейтинг: 168
#1: 2023-03-27 06:12:46 ЛС | профиль | цитата
Aziz писал(а):
Покажи плиз, а то в упор не вижу или не врубаюсь..

Я уже приводил схему выше. если непонятно, тогда такой вариант.
Пока перемещаешь форму счётчик остановлен.

Add(MainForm,7316905,378,196)
{
Point(Handle)
}
Add(PaintBox,12465343,259,231)
{
Width=735
Height=781
Align=5
Color=16777215
WinStyle=1
ColorSp=0
ClearBeforeDraw=0
Point(onMouseDown)
link(onBeforeDraw,7349550:doDraw,[(298,237)(298,363)])
link(onMouseDown,7064651:doEvent1,[])
}
Add(MoveWindow,945688,378,245)
{
link(Handle,7316905:Handle,[])
}
Add(Hub,7064651,315,238)
{
OutCount=3
link(onEvent1,13311364:doStop,[(340,244)(340,307)])
link(onEvent2,945688:doMove,[])
link(onEvent3,13311364:doTimer,[(368,258)(368,300)])
}
Add(Timer,13311364,378,294)
{
link(onTimer,14606877:doNext,[])
}
Add(CounterEx,14606877,434,294)
{
link(onNext,12465343:doRefresh,[(496,300)(496,428)(249,428)(249,237)])
}
Add(Img_Text,7349550,427,357)
{
X=175
Y=70
Font=[MS Sans Serif,50,0,0,1]
link(Bitmap,12465343:Bitmap,[(433,348)(265,348)])
link(Text,14606877:Count,[])
}

карма: 16

0