少校
UID2192777
U币261
G币5706
技术0
主题47
精华0
阅读权限90
注册时间2014-5-31
最后登录2024-10-18
在线时间746 小时
手机13478768400
少校
|
global mom_operation_name_list mom_mcsname_attach_opr
foreach op $mom_operation_name_list {
lappend mcs_list $mom_mcsname_attach_opr($op)
}
set mcs_list_count [llength $mcs_list]
for {set i 1} {$i <= [expr $mcs_list_count - 1]} {incr i} {
if {![string match [lindex $mcs_list 0] [lindex $mcs_list $i]]} {
set msg [MOM_display_message 程序中包含非G54坐标系,请注意 多坐标系提醒!确认生成多坐标系加工吗? I 按原程序输出 中止后处理]
switch $msg {
1 {
set offset_flag 1
}
2 {
MOM_abort 中止
}
}
}
}
当出现多个坐标系的时候有几个坐标系就提示几次需要多次确认怎么才能只确认一次代码怎么写?
|
|