- Timestamp:
- Dec 3, 2009, 2:03:51 PM (15 years ago)
- Location:
- trunk/gui/scripts
- Files:
-
- 1 added
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/xyprint.tcl
r1616 r1621 572 572 "Set the size (inches) of the bottom margin. If zero, the size is automatically determined." 573 573 574 575 label $page.map -image [Rappture::icon graphmargins] 574 576 blt::table $page \ 575 1,0 $page.width_l -anchor e \ 576 1,1 $page.width -fill x -cspan 2 \ 577 1,3 $page.height_l -anchor e \ 578 1,4 $page.height -fill x -cspan 2 \ 579 3,2 $page.top_l -anchor e \ 580 3,3 $page.top -fill x \ 581 4,0 $page.left_l -anchor e \ 582 4,1 $page.left -fill x \ 583 4,4 $page.right_l -anchor e \ 584 4,5 $page.right -fill x \ 585 5,2 $page.bottom_l -anchor e \ 586 5,3 $page.bottom -fill x 587 588 blt::table configure $page r* -resize none -pady { 0 2 } 589 blt::table configure $page r2 -resize both 590 blt::table configure $page c2 c4 -width .5i 591 blt::table configure $page r6 -height .125i 577 0,0 $page.width_l -anchor e \ 578 0,1 $page.width -fill x \ 579 1,0 $page.height_l -anchor e \ 580 1,1 $page.height -fill x \ 581 3,0 $page.left_l -anchor e \ 582 3,1 $page.left -fill x \ 583 4,0 $page.right_l -anchor e \ 584 4,1 $page.right -fill x \ 585 5,0 $page.top_l -anchor e \ 586 5,1 $page.top -fill x \ 587 6,0 $page.bottom_l -anchor e \ 588 6,1 $page.bottom -fill x \ 589 0,2 $page.map -fill both -rspan 7 -padx 2 590 591 blt::table configure $page c0 r* -resize none 592 blt::table configure $page c1 r2 -resize both 592 593 } 593 594
Note: See TracChangeset
for help on using the changeset viewer.