WJG (21/11/08) The release of version 0.9.92 of gnocl included the implementation of some extra Gtk widgets. One of amongst these was the handleBox widget, a toolbar container which can be torn-away and repositioned on screen. The screen grab below was generated by the attached code. It contains two handleBoxes, each populated with a number of child widgets. The handleBox can be redocked into the toolbar when necessary.
#!/bin/sh # the next line restarts using tclsh \ exec tclsh "$0" "$@" package require Gnocl set toolBar1 [gnocl::toolBar] $toolBar1 add item -text "%#Cut" $toolBar1 add item -text "%#Copy" $toolBar1 add item -text "%#Paste" $toolBar1 add item -text "%#Delete" set handleBox1 [gnocl::handleBox \ -shadow none \ -handlePosition left \ -snapEdge left \ -tooltip "tear me off" \ -onDetached {puts "Detached %w %h"} \ -onAttached {puts "Attached %w %h"} \ -child $toolBar1 ] set toolBar2 [gnocl::toolBar] set ent [gnocl::entry] $toolBar2 add widget $ent $toolBar2 add item -text "%#Find" set handleBox2 [gnocl::handleBox \ -shadow none \ -handlePosition left \ -snapEdge left \ -tooltip "tear me off" \ -onDetached {puts "Detached %w %h"} \ -onAttached {puts "Attached %w %h"} \ -child $toolBar2 ] set box [gnocl::box ] $box add $handleBox1 $box add [gnocl::separator -orientation vertical] $box add $handleBox2 gnocl::window \ -title "HandleBox" \ -child $box \ -onDelete { exit } gnocl::mainLoop
ZB Gnocl 0.9.94 doesn't like "-shadow" option... WJG (10/03/10) I'll look into this problem. Sorry about the delay....