pr = Action.Properties
Priviazka = pr.NewSelector('Привязка',"○")
Priviazka.OnClick= function(){
VybratPriviazku()
}
dx = pr.NewNumber('dx')
dy = pr.NewNumber('dy')
Action.Continue()
function VybratPriviazku()
{
//-- window Window1
Window1 = { Form : NewForm() };
Props = Window1.Form.Properties;
Window1.Form.Width = 100;
Window1.Form.Height = 157;
Window1.Form.Caption = "Привязка";
//Window1.Form.MinHeight = 150;
//Window1.Form.MinWidth = 100;
Window1.Form.MinWidth = 100;
Window1.Form.Dockable = false;
Window1.Form.Resizable = true;
//-- window Window1 properties
Window1.LV = Props.NewButton("↖");
Window1.LV.SetLayout(5, 5, 30, 30);
Window1.V = Props.NewButton("↑");
Window1.V.SetLayout(35, 5, 30, 30);
Window1.PV = Props.NewButton("↗");
Window1.PV.SetLayout(65, 5, 30, 30);
Window1.L = Props.NewButton("←");
Window1.L.SetLayout(5, 35, 30, 30);
Window1.C = Props.NewButton("○");
Window1.C.SetLayout(35, 35, 30, 30);
Window1.P = Props.NewButton("→");
Window1.P.SetLayout(65, 35, 30, 30);
Window1.LN = Props.NewButton("↙");
Window1.LN.SetLayout(5, 65, 30, 30);
Window1.N = Props.NewButton("↓");
Window1.N.SetLayout(35, 65, 30, 30);
Window1.PN = Props.NewButton("↘");
Window1.PN.SetLayout(65, 65, 30, 30);
//-- window Window1 events
Window1.LV.OnClick = function(){Priviazka.Value = "↖"; Window1.Form.Close()}
Window1.V.OnClick = function(){Priviazka.Value = "↑"; Window1.Form.Close()}
Window1.PV.OnClick = function(){Priviazka.Value = "↗"; Window1.Form.Close()}
Window1.L.OnClick = function(){Priviazka.Value = "←"; Window1.Form.Close()}
Window1.C.OnClick = function(){Priviazka.Value = "○"; Window1.Form.Close()}
Window1.P.OnClick = function(){Priviazka.Value = "→"; Window1.Form.Close()}
Window1.LN.OnClick = function(){Priviazka.Value = "↙"; Window1.Form.Close()}
Window1.N.OnClick = function(){Priviazka.Value = "↓"; Window1.Form.Close()}
Window1.PN.OnClick = function(){Priviazka.Value = "↘"; Window1.Form.Close()}
//-- window Window1 ends
Window1.Form.ShowModal();
}
[свернуть]