Вверх ↑
Ответов: 36
Рейтинг: 2
#1: 2009-11-17 22:56:42 ЛС | профиль | цитата
ОК. Вот еще одно короткое замыкание
Загадка доброй бабушки


Add(MainForm,7370021,77,140)
{
Point(doColor)
}
Add(ComboBox,1106554,189,133)
{
Left=39
Top=46
Width=299
Height=21
Strings=#27:Бабка медленно крошит батон|34:Шепчет ласково: Ешьте, соколики...|24:И, роняя слюну на газон,|19:Из кустов к ней ...|
Point(onMouseDown)
link(onMouseDown,9396628:doRandom,[(254,153)(254,174)])
}
Add(Label,2907844,266,63)
{
Left=135
Top=100
Width=89
Height=17
Caption="Отгадай загадку"
}
Add(Label,15203874,210,63)
{
Left=50
Top=127
Width=283
Height=20
Font=[MS Sans Serif,10,1,16711935,1]
Caption="Кто направляется к доброй бабушке?"
}
Add(Label,13793284,154,63)
{
Left=145
Top=15
Width=53
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Загадка"
}
Add(ComboBox,833879,189,203)
{
Left=85
Top=202
Width=200
Height=21
Strings=#20:....................|20:...ползут алкоголики|19:...шагают ментолики|18:...прыгают кролики|19:...летят голубёлики|20:...фигачат бомжолики|
Point(onMouseDown)
link(onMouseDown,9396628:doRandomize,[(254,223)(254,181)])
}
Add(Label,15699624,322,63)
{
Left=132
Top=160
Width=97
Height=17
Caption="Варианты отгадок"
}
Add(Random,9396628,287,168)
{
Min=10000
Max=100000
link(onRandom,7370021:doColor,[(333,174)(333,276)(65,276)(65,174)])
}


карма: 1

0