TK packing

[Guest]

How can I pack this so it looks like this.

[New Sprite [-][+][x]]
-------------------------
| Width: [ ] |
| Height: [ ] |
- - - - - - - - - - - -

dialogBox = TkToplevel.new('title'=>'New Sprite')
frame = TkFrame.new(dialogBox).pack('fill'=>'both')

widthLabel = TkLabel.new(frame, 'text'=>'Width: ')
widthEntry = TkEntry.new(frame)
widthEntry.value = 32
heightLabel = TkLabel.new(frame, 'text'=>'Height: ')
heightEntry = TkEntry.new(frame)
heightEntry.value = 32

 

[Hidetoshi NAGAI]

From: Guest <[email protected]>
Subject: TK packing
Date: Wed, 8 Mar 2006 12:20:00 +0900

How can I pack this so it looks like this.

[New Sprite [-][+][x]]

Please read a Tcl/Tk's document about the rule of 'pack' geometry
manager or 'grid' geometry manager.

dialogBox = TkToplevel.new('title'=>'New Sprite')
frame = TkFrame.new(dialogBox).pack('fill'=>'both')

widthLabel = TkLabel.new(frame, 'text'=>'Width: ')
widthEntry = TkEntry.new(frame)
widthEntry.value = 32
heightLabel = TkLabel.new(frame, 'text'=>'Height: ')
heightEntry = TkEntry.new(frame)
heightEntry.value = 32

--------< example 1 >---------------------------------------
dialogBox = TkToplevel.newtitle=>'New Sprite')
frame = TkFrame.new(dialogBox).packfill=>'both')

f_width = TkFrame.new(frame).pack
widthLabel = TkLabel.new(f_width, :text=>'Width: ').packside=>:left)
widthEntry = TkEntry.new(f_width).packside=>:left)
widthEntry.value = 32

f_height = TkFrame.new(frame).pack
heightLabel = TkLabel.new(f_height, :text=>'Height: ').packside=>:left)
heightEntry = TkEntry.new(f_height).packside=>:left)
heightEntry.value = 32
------------------------------------------------------------

--------< example 2 >---------------------------------------
dialogBox = TkToplevel.newtitle=>'New Sprite')
frame = TkFrame.new(dialogBox).packfill=>'both')

widthLabel = TkLabel.new(frame, :text=>'Width: ')
widthEntry = TkEntry.new(frame)
widthEntry.value = 32
Tk.grid(widthLabel, widthEntry)

heightLabel = TkLabel.new(frame, :text=>'Height: ')
heightEntry = TkEntry.new(frame)
heightEntry.value = 32
Tk.grid(heightLabel, heightEntry)