ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2024-11-13 17:48:34 +05:00
Code Issues Packages Projects Releases Wiki Activity

allow visualizing smaller tangent points

Browse Source
This commit is contained in:
Christopher Lackner 2020-10-14 19:00:44 +02:00
parent 307c2a3bbb
commit bdb04f9784
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ng/dialog.tcl
View File

@ -1436,7 +1436,7 @@ proc viewingoptionsdialog { } {
#pack $f.f1 -pady 5 -anchor center
ttk::label $f.center.lab1 -text "SpecPoint Veclen"
ttk::entry $f.center.ent1 -width 5 -textvariable viewoptions.specpointvlen -validate focus \
-validatecommand "my_validate %W 0 1e9 %P 1" \
-validatecommand "my_validate %W 0 1e9 %P 4" \
-invalidcommand "my_invalid %W"
grid $f.center.ent1 $f.center.lab1 -sticky nw -padx 4

2
ng/onetcl.cpp
View File

@ -2316,7 +2316,7 @@ DLL_HEADER const char * ngscript[] = {""
,"grid $f.center.ent $f.center.btn -sticky nw -padx 4\n"
,"ttk::label $f.center.lab1 -text \"SpecPoint Veclen\"\n"
,"ttk::entry $f.center.ent1 -width 5 -textvariable viewoptions.specpointvlen -validate focus \\\n"
,"-validatecommand \"my_validate %W 0 1e9 %P 1\" \\\n"
,"-validatecommand \"my_validate %W 0 1e9 %P 4\" \\\n"
,"-invalidcommand \"my_invalid %W\"\n"
,"grid $f.center.ent1 $f.center.lab1 -sticky nw -padx 4\n"
,"set f $w.nb.misc\n"