rollout unnamedRollout "Untitled" 269 height:320
(
button btn1 "拾取物体" pos:[136,140] 93 height:23
listbox lbx1 "物体列表" pos:[19,49] 96 height:7
edittext edt1 "重名名材质球" pos:[21,200] 214 height:26
label lbl1 "修改材质球名称 V1.0" pos:[21,11] 144 height:27
on btn1 pressed do
lbx1.items = (for a in selection collect a.name)
on edt1 entered text do
(
materialname = edt1.text
for m=1 to 24 do
(
meditmaterials[m].name = materialname + (m as string)
)
)
)
createdialog unnamedRollout
