MEL選択頂点、 XＹＺボタン上の数値入力後ｸﾘｯｸ各座標移動

global proc X()
{
float $aa = `textField -query -text AA`;
move -a -x $aa ;
};

global proc Y()
{
float $bb = `textField -query -text BB`;
move -a -y $bb ;
};

global proc Z()
{
float $cc = `textField -query -text CC`;
move -a -z $cc ;
};

global proc ChannelInfo() {
if ((`window -ex ChannelInfo`) == true) deleteUI

ChannelInfo;

window -width 160 -height 50 -title "vtxXYZ" -rtf 1

ChannelInfo;

columnLayout -adjustableColumn true;

gridLayout -numberOfColumns 3 -cellWidth 50 -cellHeight 20;

textField -width 50 -editable true AA;
textField -width 50 -editable true BB;
textField -width 50 -editable true CC;

gridLayout -numberOfColumns 3 -cellWidth 50 -cellHeight 20;

button -label "X" -command "X";
button -label "Y" -command "Y";
button -label "Z" -command "Z";

showWindow ChannelInfo;

};

ChannelInfo;

textField -e -tx 0 AA;