Lines Matching defs:cursor
4 # Map symbolic cursor names to platform-appropriate cursors.
8 # standard -- default cursor for most controls
9 # "" -- inherit cursor from parent window
10 # none -- no cursor
32 # X11 doesn't have a "forbidden" cursor (usually a slashed circle);
33 # "pirate" seems to be the conventional cursor for this purpose.
35 # Windows has an IDC_HELP cursor, but it's not available from Tk.
44 # Use X11 cursor names as defaults, since Tk supplies these
126 ## ttk::cursor $cursor --
127 # Return platform-specific cursor for specified symbolic cursor.
129 proc ttk::cursor {name} {
134 ## ttk::setCursor $w $cursor --
135 # Set the cursor for specified window.
138 # instead of directly calling [$w configure -cursor ...],
145 if {[$w cget -cursor] ne $Cursors($name)} {
146 $w configure -cursor $Cursors($name)
166 foreach cursor $row {
168 ttk::label $w -text $cursor -cursor [ttk::cursor $cursor] \