Package

[Kim Skatun]

I have problem using the gridplus library inside a package:

1: I cant get the value from an entry created: entry .naca -width 8 -textvariable nacaEdit

puts "Hello: $nacaEdit "


2: and also i am not able to merge two cells in the grid : I would like to have the two bottons under each other and the two labels left align and that the entry field spans between the label and the buttons.


gridplus grid .geometryPage -size 80 {
{"NACA 4-Series Airfoil"} {.naca} {.generateNaca}
{"File" .geomb} {.browseAirfoil}



3: Can i put different procedures in the same package but in different files?

Now i call it cleanGeom but i would like to move the guui code to geometry::gui
and cleanGeom to geometry::cleanGeom


Thanks
****************** CODE ****************************

package provide geometry 1.0

package require gridplus 1.0
namespace import gridplus::*

namespace eval ::geometry {
# this is the public interface
namespace export geometry

# these contain references to available commands and subcommands
#variable getPane

}


proc ::geometry::getPane {} {
button .generateNaca -text "Generate" -command "geometry::airfoilGen"
button .browseAirfoil -text "Browse"

entry .naca -width 8 -textvariable nacaEdit
entry .geomb -width 20


gridplus grid .geometryPage -size 80 {
{"NACA 4-Series Airfoil"} {.naca} {.generateNaca}
{"File" .geomb} {.browseAirfoil}
}

gridplus layout .geometryFrame {
.geometryPage
}


}



# AIRFOIL GENERATION PROCEDURE
# -----------------------------------------------
proc ::geometry::airfoilGen {} {
puts "Hello: $nacaEdit "
cleanGeom

}