Вверх ↑
Ответов: 1731
Рейтинг: 68
#1: 2012-07-17 17:40:05 ЛС | профиль | цитата
Зашибца
------------ Дoбавленo в 17.40:
Устраиваю конкурс.
Кто сделает динамическое изменение размеров Формы и контролов.
То есть Sizer.
Он должен работать только на панель и его контролы.
Тот получит максимальное кол-во рейтинга которое могу за сутки поставить.
Шаблон(SHA)

Add(MainForm,2953706,21,105)
{
Width=761
Height=566
Color=15780518
Position=1
}
Add(ChildPanel,12387855,133,105)
{
}
BEGIN_SDK
Add(EditMulti,5086666,21,21)
{
WorkCount=1
Width=517
Height=326
link(doWork1,14204520:doNext,[(119,27)(119,55)])
}
Add(Panel,3985978,42,252)
{
Left=180
Top=135
Width=395
Height=260
BorderWidth=0
BevelWidth=0
Point(Handle)
link(onClick,753006:doMove,[(84,258)(84,343)(30,343)(30,307)])
}
Add(MoveWindow,753006,42,301)
{
link(Handle,3985978:Handle,[])
}
Add(ChildPanelEx,15323999,217,49)
{
link(Str1,14204520:Count,[(223,37)(188,37)(188,93)(153,93)])
}
BEGIN_SDK
Add(EditMultiEx,2221902,21,21)
{
WorkCount=#5:##add|
DataCount=#4:Str1|
Point(##add)
link(##add,828796:doString,[(104,27)(104,69)])
}
Add(Panel,5140928,63,63)
{
Left=160
Top=115
Width=90
Height=35
BorderWidth=0
BevelWidth=0
Point(Handle)
}
Add(Button,2731631,210,63)
{
Width=90
Height=35
Align=5
Visible=1
Caption="Push me"
Point(onDblClick)
Point(doCaption)
Point(doVisible)
link(onDblClick,6390913:doMove,[(249,76)(249,151)(51,151)(51,118)])
}
Add(MoveWindow,6390913,63,112)
{
link(Handle,5140928:Handle,[])
}
Add(FormatStr,828796,119,63)
{
DataCount=1
Mask="Button_%1"
link(onFString,5879585:doEvent1,[])
link(Str1,2221902:Str1,[(125,42)(27,42)])
}
Add(Hub,5879585,168,63)
{
link(onEvent1,2731631:doCaption,[])
link(onEvent2,2731631:doVisible,[])
}
END_SDK
Add(CounterEx,14204520,147,49)
{
link(onNext,15323999:##add,[])
}
END_SDK
Add(Button,1084590,84,105)
{
Width=20
Caption="+"
link(onClick,12387855:doWork1,[])
}

карма: 1

0