Add(MainForm,86150,210,196)
{
Width=246
Height=179
Point(Handle)
Point(onPaint)
link(onActivate,15825659:doEvent1,[])
}
Add(For,6197742,399,273)
{
End=200
Step=50
link(onEvent,2715667:doSleepMks,[])
}
Add(For,2820943,406,343)
{
End=100
Step=20
link(onEvent,6197742:doFor,[(450,349)(450,314)(387,314)(387,279)])
}
Add(Img_Text,8256300,385,441)
{
DrawSource=1
Text="Hello"
Point(X)
Point(Y)
link(Bitmap,86150:Handle,[(391,401)(216,401)])
link(X,6197742:Position,[])
link(Y,2820943:Position,[])
}
Add(Button,2706557,301,343)
{
Left=85
Top=120
}
Add(Sleep,2715667,490,273)
{
Delay=100000
link(onSleep,8256300:doDraw,[(549,279)(549,493)(373,493)(373,447)])
}
Add(Hub,15825659,343,196)
{
link(onEvent1,1407287:doProcessMessages,[])
link(onEvent2,2820943:doFor,[(374,209)(374,349)])
}
Add(Application,1407287,399,196)
{
Wait=1
}
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
unalex, используй onActivate или onPaint, но рисование на контексте, как представлено, по onCreate, не совсем правильно при активации/дезактивации формы текст исчезнет. Ну, вам виднее, тогда используйте выход onResize, он больше подойдет
|
|||
карма: 22 |
|