diff options
Diffstat (limited to 'itcl/iwidgets/demos/extbutton')
| -rw-r--r-- | itcl/iwidgets/demos/extbutton | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/itcl/iwidgets/demos/extbutton b/itcl/iwidgets/demos/extbutton new file mode 100644 index 00000000000..5a199a7b5d9 --- /dev/null +++ b/itcl/iwidgets/demos/extbutton @@ -0,0 +1,15 @@ +# ---------------------------------------------------------------------- +# DEMO: extbutton in [incr Widgets] +# ---------------------------------------------------------------------- +package require Iwidgets 4.0 + +iwidgets::extbutton .eb1 -text "Bitmap example" -bitmap info \ + -background bisque -activeforeground red -bitmapforeground blue \ + -defaultring 1 -command {puts "Bisque is beautiful"} + +iwidgets::extbutton .eb2 -text "Image example" -bd 3 -image \ + [image create photo -file $iwidgets::library/demos/images/clear.gif] \ + -font 9x15bold -background lightgreen -imagepos e \ + -activebackground lightyellow + +pack .eb1 .eb2 -pady 8 |