Changeset 413 for trunk/gui/scripts/meshresult.tcl
- Timestamp:
- Apr 26, 2006, 6:42:46 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/meshresult.tcl
r193 r413 22 22 option add *MeshResult.font \ 23 23 -*-helvetica-medium-r-normal-*-*-120-* widgetDefault 24 25 blt::bitmap define MeshResult-reset {26 #define reset_width 1227 #define reset_height 1228 static unsigned char reset_bits[] = {29 0x00, 0x00, 0x00, 0x00, 0xfc, 0x03, 0x04, 0x02, 0x04, 0x02, 0x04, 0x02,30 0x04, 0x02, 0x04, 0x02, 0x04, 0x02, 0xfc, 0x03, 0x00, 0x00, 0x00, 0x00};31 }32 24 33 25 itcl::class Rappture::MeshResult { … … 85 77 button $itk_component(controls).reset \ 86 78 -borderwidth 1 -padx 1 -pady 1 \ 87 -bitmap MeshResult-reset\79 -bitmap [Rappture::icon reset] \ 88 80 -command [itcl::code $this _zoom reset] 89 81 } {
Note: See TracChangeset
for help on using the changeset viewer.