Возможно:
[code:1] Add(TreeView,10272715,189,126)
{
Left=70
Top=10
Width=220
Height=75
Font=[MS Sans Serif,8,0,0]
Strings='1','(','2',')'
Point(doSelect)
}
Add(Button,7164745,112,133)
{
Left=5
Top=10
Font=[MS Sans Serif,8,0,0]
Caption="Add"
Data=String(CTPOKA)
link(onClick,10272715:doAdd,[(166,139)(166,132)])
}
Add(Button,515717,112,189)
{
Left=5
Top=35
Font=[MS Sans Serif,8,0,0]
Caption="Delete"
Data=Integer(0)
link(onClick,10272715:doDelete,[(166,195)(166,146)])
}
Add(Button,6027139,112,238)
{
Left=5
Top=65
Font=[MS Sans Serif,8,0,0]
Caption="Select"
Data=Integer(0)
link(onClick,10272715:doSelect,[(166,244)(166,167)])
}
[/code:1]