global TDTblRollout
rollout TDTblRollout "Untitled"
(
dotnetcontrol one "System.Windows.Forms.RadioButton" width:60 height:20 pos:[10,10]--
dotnetcontrol two "System.Windows.Forms.RadioButton" width:60 height:20 pos:[10,40]--
dotnetcontrol cc "System.Windows.Forms.GroupBox" width:200 height:100 pos:[0,0]
button op "!!!!!!!!!"
on TDTblRollout open do
(
cc.text ="dddd"
Falt= dotnetclass "System.Windows.Forms.FlatStyle"
cc.FlatStyle = Falt.Flat;
---*** 使用这个控件是可以 但是 感觉在max 中 group 支持的超级不好
---**** 所有的东西都重载了一起
--cc.Controls.Add(one)
--cc.Controls.Add(two )
ce =dotnetclass "System.Windows.Forms.AnchorStyles"
cc.Anchor = ce.Bottom ;
one.text = dotnetobject "system.string" "空间1"
two.text = dotnetobject "system.string" "空间2"
--- 这里要加载一个事件
)
on one Click do
(
two.Checked=false ;
)
on two Click do
(
one.Checked=false
)
on op pressed do
(
one.text ="1"
two.text = "2"
)
)
createdialog TDTblRollout 300 500