Вверх ↑
Ответов: 113
Рейтинг: 1
#1: 2017-11-24 13:02:51 ЛС | профиль | цитата
хотел попробовать придать круглую форму панели, а тут вдруг касперский стал ругаться)

код


Add(MainForm,10225725,301,98)
{
Color=15780518
Caption="Пример использования RGN_Eliptic"
BorderStyle=3
Position=1
Point(Handle)
Point(Width)
Point(Height)
link(onCreate,10314879:doCreateElliptic,[])
}
Add(RGN_SetToWindow,7533673,413,112)
{
link(Handle,14589489:Var1,[])
}
Add(RGN_Elliptic,10314879,357,112)
{
Point1=3276850
Point2=9830550
link(onCreateElliptic,7533673:doSetRegion,[])
}
Add(ChildPanel,14589489,413,56)
{
}
BEGIN_SDK
Add(EditMulti,527088,21,21)
{
VarCount=1
link(Var1,3976170:Handle,[(27,179)(41,179)])
}
Add(Panel,3976170,35,105)
{
Left=130
Top=85
Point(Handle)
}
END_SDK




2017-11-24_12-58-46.png
карма: 0
well done turner
0