| In: |
tk/lib/tk/place.rb
|
| TkCommandNames | = | ['place'.freeze].freeze |
# File tk/lib/tk/place.rb, line 31 def configinfo(win, slot = nil) # for >= Tk8.4a2 ? if TkComm::GET_CONFIGINFOwoRES_AS_ARRAY # win = win.epath if win.kind_of?(TkObject) win = _epath(win) if slot conf = tk_split_list(tk_call_without_enc('place', 'configure', win, "-#{slot}") ) conf[0] = conf[0][1..-1] conf else tk_split_simplelist(tk_call_without_enc('place', 'configure', win)).collect{|conflist| conf = list(conflist) conf[0] = conf[0][1..-1] conf } end else # ! TkComm::GET_CONFIGINFOwoRES_AS_ARRAY current_configinfo(win, slot) end end
# File tk/lib/tk/place.rb, line 12 def configure(win, slot, value=None) # for >= Tk8.4a2 ? # win = win.epath if win.kind_of?(TkObject) win = _epath(win) if slot.kind_of? Hash params = [] slot.each{|k, v| params.push("-#{k}") # params.push((v.kind_of?(TkObject))? v.epath: v) params.push(_epath(v)) } tk_call_without_enc('place', 'configure', win, *params) else # value = value.epath if value.kind_of?(TkObject) value = _epath(value) tk_call_without_enc('place', 'configure', win, "-#{slot}", value) end end
# File tk/lib/tk/place.rb, line 54 def current_configinfo(win, slot = nil) # win = win.epath if win.kind_of?(TkObject) win = _epath(win) if slot conf = tk_split_list(tk_call_without_enc('place', 'configure', win, "-#{slot}") ) { conf[0][1..-1] => conf[1] } else ret = {} tk_split_list(tk_call_without_enc('place','configure',win)).each{|conf| ret[conf[0][1..-1]] = conf[1] } ret end end
# File tk/lib/tk/place.rb, line 70 def forget(win) # win = win.epath if win.kind_of?(TkObject) win = _epath(win) tk_call_without_enc('place', 'forget', win) end
# File tk/lib/tk/place.rb, line 76 def info(win) # win = win.epath if win.kind_of?(TkObject) win = _epath(win) ilist = list(tk_call_without_enc('place', 'info', win)) info = {} while key = ilist.shift info[key[1..-1]] = ilist.shift end return info end