fix set stl tolerance from gui

This commit is contained in:
Christopher Lackner 2019-09-20 13:08:15 +02:00
parent 5724b397d1
commit 3f255d9139
2 changed files with 10 additions and 10 deletions

View File

@ -2228,7 +2228,7 @@ proc stloptionsdialog { } {
}
proc stldoctordialog { } {
Ng_STLDoctor 0 0
Ng_STLDoctor
set wd .stldoctor_dlg
if {[winfo exists .stldoctor_dlg] == 1} {
@ -2642,17 +2642,17 @@ proc stldoctordialog { } {
#tixControl $f.gtol -label "load-geometry tolerance factor" -integer false \
-variable stldoctor.geom_tol_fact \
-options {
# -variable stldoctor.geom_tol_fact \
# -options {
# entry.width 8
# label.width 30
# label.anchor e
#}
ttk::spinbox $f.gtol -from 1 -to 20 -textvariable stldoctor.geom_tol_fact -width 8
pack $f.gtol
ttk::label $f.gtol_lbl -text "LoadSTL tolerance factor"
ttk::spinbox $f.gtol -from 1e-15 -to 0.001 -textvariable stldoctor.geom_tol_fact -width 8
pack $f.gtol_lbl $f.gtol
ttk::button $f.adap -text "Apply" -command {
.stldoctor_dlg.nb.advanced.gtol invoke
Ng_STLDoctor;
}
pack $f.adap -expand yes

View File

@ -2804,7 +2804,7 @@ const char * ngscript[] = {""
,"}\n"
,"}\n"
,"proc stldoctordialog { } {\n"
,"Ng_STLDoctor 0 0\n"
,"Ng_STLDoctor\n"
,"set wd .stldoctor_dlg\n"
,"if {[winfo exists .stldoctor_dlg] == 1} {\n"
,"wm withdraw $wd\n"
@ -3055,10 +3055,10 @@ const char * ngscript[] = {""
,"-variable stldoctor.conecheck \\\n"
,"-command {Ng_STLDoctor;}\n"
,"pack $f.sc.bu $f.sc.bu2\n"
,"ttk::spinbox $f.gtol -from 1 -to 20 -textvariable stldoctor.geom_tol_fact -width 8\n"
,"pack $f.gtol\n"
,"ttk::label $f.gtol_lbl -text \"LoadSTL tolerance factor\"\n"
,"ttk::spinbox $f.gtol -from 1e-15 -to 0.001 -textvariable stldoctor.geom_tol_fact -width 8\n"
,"pack $f.gtol_lbl $f.gtol\n"
,"ttk::button $f.adap -text \"Apply\" -command {\n"
,".stldoctor_dlg.nb.advanced.gtol invoke\n"
,"Ng_STLDoctor;\n"
,"}\n"
,"pack $f.adap -expand yes\n"