Searched refs:anchor (Results 1 - 25 of 42) sorted by relevance

12

/ast/src/lib/libtk/library/demos/
H A Dctext.tcl41 $c addtag text withtag [$c create text 250 200 -text "This is just a string of text to demonstrate the text facilities of canvas widgets. Bindings have been been defined to support editing (see above)." -width 440 -anchor n -font -*-Helvetica-Medium-R-Normal--*-240-*-*-*-*-*-* -justify left]
53 # Next, create some items that allow the text's anchor position
66 mkTextConfig $c $x $y -anchor se $color
67 mkTextConfig $c [expr $x+30] [expr $y] -anchor s $color
68 mkTextConfig $c [expr $x+60] [expr $y] -anchor sw $color
69 mkTextConfig $c [expr $x] [expr $y+30] -anchor e $color
70 mkTextConfig $c [expr $x+30] [expr $y+30] -anchor center $color
71 mkTextConfig $c [expr $x+60] [expr $y+30] -anchor w $color
72 mkTextConfig $c [expr $x] [expr $y+60] -anchor ne $color
73 mkTextConfig $c [expr $x+30] [expr $y+60] -anchor
[all...]
H A Dmsgbox.tcl37 -relief flat -value $i -width 16 -anchor w
38 pack $w.left.b$i -side top -pady 2 -anchor w -fill x
49 -relief flat -value $t -width 16 -anchor w
50 pack $w.right.$t -side top -pady 2 -anchor w -fill x
H A Ditems.tcl68 $c create text 5c .2c -text Lines -anchor n
82 $c create text 15c .2c -text "Curves (smoothed lines)" -anchor n
92 $c create text 25c .2c -text Polygons -anchor n
103 $c create text 5c 8.2c -text Rectangles -anchor n
110 $c create text 15c 8.2c -text Ovals -anchor n
117 $c create text 25c 8.2c -text Text -anchor n
119 $c create text 22.5c 9c -anchor n -font $font1 -width 4c \
120 -text "A short string of text, word-wrapped, justified left, and anchored north (at the top). The rectangles show the anchor points for each piece of text." -tags item
122 $c create text 25.5c 11c -anchor w -font $font1 -fill $blue \
126 $c create text 25c 14c -font $font2 -anchor
[all...]
H A Dradio.tcl32 pack $w.left.b$i -side top -pady 2 -anchor w
39 pack $w.right.$lower -side top -pady 2 -anchor w
H A Dcheck.tcl29 pack $w.b1 $w.b2 $w.b3 -side top -pady 2 -anchor w
H A Dfilebox.tcl25 label $f.lab -text "Select a file to $i: " -anchor e
37 pack $w.strict -anchor c
H A Dfloor.tcl59 $w create window 600 100 -anchor w -window $w.entry
60 $w create text 600 100 -anchor e -text "Room: "
335 $w create text 358 209 -text 101 -fill $color -anchor c -tags {floor1 label}
339 $w create text 323 223 -text {Pub Lift1} -fill $color -anchor c -tags {floor1 label}
343 $w create text 323 188 -text {Priv Lift1} -fill $color -anchor c -tags {floor1 label}
347 $w create text 21.5 363 -text 110 -fill $color -anchor c -tags {floor1 label}
351 $w create text 67 363 -text 109 -fill $color -anchor c -tags {floor1 label}
355 $w create text 28.5 276.5 -text 111 -fill $color -anchor c -tags {floor1 label}
359 $w create text 88.5 278.5 -text 117B -fill $color -anchor c -tags {floor1 label}
363 $w create text 28.5 227.5 -text 112 -fill $color -anchor
[all...]
H A Darrow.tcl79 -text $v(c) -anchor w
84 $c create text [expr $v(x1)-15] $v(y) -text $v(width) -anchor e
89 -text $v(a) -anchor n
94 -text $v(b) -anchor n
97 -anchor w -font -*-Helvetica-Medium-R-Normal--*-180-*-*-*-*-*-*
99 -anchor w -font -*-Helvetica-Medium-R-Normal--*-180-*-*-*-*-*-*
H A Dhscale.tcl31 pack $w.frame.canvas -side top -expand yes -anchor s -fill x -padx 15
32 pack $w.frame.scale -side bottom -expand yes -anchor n
H A Dimage2.tcl63 pack $w.dirLabel $w.dirName $w.spacer1 $w.fileLabel $w.f -side top -anchor w
76 pack $w.spacer2 $w.imageLabel $w.image -side top -anchor w
H A Drolodex22 pack .frame -side top -fill y -anchor center
27 pack .frame.$i -side top -pady 2 -anchor e
29 label .frame.$i.label -text [lindex $names $i] -anchor e
35 pack .buttons -side bottom -pady 2 -anchor center
H A Dvscale.tcl32 pack $w.frame.scale -side left -anchor ne
33 pack $w.frame.canvas -side left -anchor nw -fill y
H A Dclrpick.tcl30 pack $w.back $w.fore -side top -anchor c -pady 2m
H A Dlabel.tcl31 pack $w.left.l1 $w.left.l2 $w.left.l3 -side top -expand yes -pady 2 -anchor w
H A Dplot.tcl37 $c create text $x 254 -text [expr 10*$i] -anchor n -font $plotFont
42 $c create text 96 $y -text [expr $i*50].0 -anchor e -font $plotFont
H A Dsearch.tcl88 label $w.file.label -text "File name:" -width 13 -anchor w
101 label $w.string.label -text "Search string:" -width 13 -anchor w
H A Dwidget48 -font -*-Helvetica-Medium-R-Normal--*-120-*-*-*-*-*-* -anchor w
50 -font -*-Helvetica-Medium-R-Normal--*-120-*-*-*-*-*-* -anchor w
244 label $w.title -text "Variable values:" -width 20 -anchor center \
255 label $w.$i.name -text "$i: " -width [expr $len + 2] -anchor w
256 label $w.$i.value -textvar $i -anchor w
259 pack $w.$i -side top -anchor w -fill x
/ast/src/lib/libtk/library/
H A Dlistbox.tcl197 $w selection anchor $el
218 set anchor [$w index anchor]
227 if [$w selection includes anchor] {
229 $w selection set anchor $el
232 $w selection clear anchor $el
234 while {($i < $el) && ($i < $anchor)} {
240 while {($i > $el) && ($i > $anchor)} {
265 && [$w selection includes anchor]} {
287 $w selection anchor
[all...]
H A DoptMenu.tcl37 -relief raised -bd 2 -highlightthickness 2 -anchor c
H A Dtext.tcl225 %W mark set anchor insert
228 %W mark set anchor insert
426 # widgets. It moves the insertion cursor, sets the selection anchor,
441 $w mark set anchor insert
461 if [catch {$w index anchor}] {
462 $w mark set anchor $cur
464 set anchor [$w index anchor]
465 if {[$w compare $cur != $anchor] || (abs($tkPriv(pressX) - $x) >= 3)} {
470 if [$w compare $cur < anchor] {
[all...]
H A Dentry.tcl313 # widgets. It moves the insertion cursor, sets the selection anchor,
346 set anchor [$w index anchor]
347 if {($cur != $anchor) || (abs($tkPriv(pressX) - $x) >= 3)} {
353 if {$cur < $anchor} {
354 $w selection range $cur $anchor
355 } elseif {$cur > $anchor} {
356 $w selection range $anchor $cur
363 if {$cur < [$w index anchor]} {
365 [string wordend [$w get] [expr $anchor
[all...]
H A Dclrpick.tcl228 label $box.label -text $c: -width 6 -under 0 -anchor ne
232 pack $box.entry -side left -anchor n -pady 0
273 set lab [label $selFrame.lab -text "Selection:" -under 0 -anchor sw]
280 pack $f1 -expand yes -anchor nw -fill both -padx 6 -pady 10
285 pack $selFrame -side left -fill none -anchor nw
286 pack $topFrame -side top -expand yes -fill both -anchor nw
/ast/src/lib/libast/comp/
H A Dregexp.c94 _re_exec(regexp_t* re, const char* subject, const char* handle, int anchor) argument
100 if (regexec(&env->re, subject, elementsof(match), match, 0) || anchor && match[0].rm_so)
/ast/src/lib/libtk/generic/
H A DtkGet.c104 Tcl_AppendResult(interp, "bad anchor position \"", string,
129 Tk_NameOfAnchor(anchor)
130 Tk_Anchor anchor; /* Anchor for which identifying string
133 switch (anchor) {
144 return "unknown anchor position";
H A DtkCanvImg.c28 Tk_Anchor anchor; /* Where to anchor image relative to member in struct:ImageItem
45 {TK_CONFIG_ANCHOR, "-anchor", (char *) NULL, (char *) NULL,
46 "center", Tk_Offset(ImageItem, anchor), TK_CONFIG_DONT_SET_DEFAULT},
161 imgPtr->anchor = TK_ANCHOR_CENTER;
241 * of an image item, such as its anchor position.
372 * Compute location and size of image, using anchor information.
376 switch (imgPtr->anchor) {

Completed in 27 milliseconds

12