Class: Tk::BLT::Watch

Inherits:
TkObject show all
Extended by:
TkCore
Defined in:
lib/tkextlib/blt/watch.rb

Constant Summary collapse

TkCommandNames = 
['::blt::watch'.freeze].freeze
WATCH_ID_TBL = 
TkCore::INTERP.create_table
BLT_WATCH_ID = 
['blt_watch_id'.freeze, '00000'.taint].freeze

Constants included from TkCore

TkCore::EventFlag, TkCore::INTERP, TkCore::WIDGET_DESTROY_HOOK

Constants included from TkComm

TkComm::GET_CONFIGINFO_AS_ARRAY, TkComm::GET_CONFIGINFOwoRES_AS_ARRAY, TkComm::TkExtlibAutoloadModule, TkComm::Tk_CMDTBL, TkComm::Tk_IDs, TkComm::Tk_WINDOWS, TkComm::USE_TCLs_LIST_FUNCTIONS, TkComm::WidgetClassNames

Constants included from TkUtil

TkUtil::None, TkUtil::RELEASE_DATE

Constants included from Tk

AUTO_PATH, INTERP, JAPANIZED_TK, LIBRARY_PATH, MAINLOOP, PACKAGE_PATH, RELEASE_DATE, TCL_LIBRARY_PATH, TCL_MAJOR_VERSION, TCL_MINOR_VERSION, TCL_PACKAGE_PATH, TCL_PATCHLEVEL, TCL_PRECISION, TCL_VERSION, TK_MAJOR_VERSION, TK_MINOR_VERSION, TK_PATCHLEVEL, TK_VERSION, Tkextlib_RELEASE_DATE, TreeCtrl_Widget, X_Scrollable, Y_Scrollable

Class Method Summary collapse

Instance Method Summary collapse

Methods included from TkCore

_tk_call_to_list_core, after, after_cancel, after_idle, appname, appsend, appsend_deny, appsend_displayof, callback, callback_break, callback_continue, callback_return, chooseColor, chooseDirectory, do_one_event, event_generate, getMultipleOpenFile, getMultipleSaveFile, getOpenFile, getSaveFile, get_eventloop_tick, get_eventloop_weight, get_no_event_wait, inactive, inactive_displayof, ip_eval, ip_eval_with_enc, ip_eval_without_enc, ip_invoke, ip_invoke_with_enc, ip_invoke_without_enc, is_mainloop?, load_cmd_on_ip, mainloop, mainloop_exist?, mainloop_thread?, mainloop_watchdog, messageBox, rb_appsend, rb_appsend_displayof, reset_inactive, reset_inactive_displayof, restart, scaling, scaling_displayof, set_eventloop_tick, set_eventloop_weight, set_no_event_wait, tk_call, tk_call_to_list, tk_call_to_list_with_enc, tk_call_to_list_without_enc, tk_call_to_simplelist, tk_call_to_simplelist_with_enc, tk_call_to_simplelist_without_enc, tk_call_with_enc, tk_call_without_enc, windowingsystem

Methods included from TkComm

_at, _callback_entry?, _callback_entry_class?, _curr_cmd_id, _fromUTF8, _genobj_for_tkwidget, _next_cmd_id, _toUTF8, array2tk_list, #bind, #bind_all, #bind_append, #bind_append_all, #bind_remove, #bind_remove_all, #bindinfo, #bindinfo_all, bool, image_obj, install_cmd, list, num_or_str, number, procedure, simplelist, string, #subst, tk_tcl2ruby, uninstall_cmd, window

Methods included from TkUtil

_conv_args, #_conv_args, #_fromUTF8, _get_eval_enc_str, #_get_eval_enc_str, #_get_eval_string, _get_eval_string, _symbolkey2str, #_symbolkey2str, #_toUTF8, bool, #bool, callback, eval_cmd, #hash_kv, hash_kv, install_cmd, num_or_str, #num_or_str, number, #number, string, #string, uninstall_cmd

Methods included from TkEvent

#install_bind, #install_bind_for_event_class

Methods inherited from TkObject

#destroy, #epath, #event_generate, #method_missing, #path, #tk_send, #tk_send_to_list, #tk_send_to_list_with_enc, #tk_send_to_list_without_enc, #tk_send_to_simplelist, #tk_send_to_simplelist_with_enc, #tk_send_to_simplelist_without_enc, #tk_send_with_enc, #tk_send_without_enc, #to_eval

Methods included from TkBindCore

#bind, #bind_append, #bind_remove, #bindinfo

Methods included from TkConfigMethod

#[], #[]=, #config_hash_kv, #configure, #configure_cmd, #current_configinfo

Methods included from TkTreatFont

#font_configinfo, #font_configure, #font_copy, #kanjifont_configure, #kanjifont_copy, #latinfont_configure, #latinfont_copy

Methods included from Tk

BinaryString, EncodedString, UTF8_String, add_kinsoku, bell, bell_on_display, const_missing, current_grabs, cursor_display, delete_kinsoku, destroy, #encoding, #encoding=, errorCode, errorInfo, exit, focus, focus_lastfor, focus_next, focus_prev, focus_to, fromUTF8, grid, grid_forget, has_mainwindow?, load_tcllibrary, load_tclscript, load_tclscript_rsrc, load_tclscript_rsrcid, lower_window, pack, pack_forget, pkgconfig_get, pkgconfig_list, place, place_forget, raise_window, #root, show_kinsoku, strictMotif, subst_tk_backslash, subst_utf_backslash, tcl_pkgconfig_get, tcl_pkgconfig_list, thread_update, thread_update_idletasks, tk_pkgconfig_get, tk_pkgconfig_list, toUTF8, to_backslash_sequence, ungrid, unload_tcllibrary, unpack, unplace, #update, update, update_idletasks, utf_to_backslash, utf_to_backslash_sequence

Methods included from Encoding

#encoding, #encoding=, #encoding_convertfrom, #encoding_convertto, #encoding_dirs, #encoding_dirs=, #encoding_names, #encoding_system, #encoding_system=

Methods inherited from TkKernel

new

Constructor Details

#initialize(name = nil, keys = {}) ⇒ Watch

Returns a new instance of Watch.



39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
 
# File 'lib/tkextlib/blt/watch.rb', line 39

def initialize(name = nil, keys = {})
  if name.kind_of?(Hash)
    keys = name
    name = nil
  end

  if name
    @id = name.to_s
  else
    @id = BLT_WATCH_ID.join(TkCore::INTERP._ip_id_)
    BLT_WATCH_ID[1].succ!
  end

  @path = @id

  WATCH_ID_TBL[@id] = self
  tk_call('::blt::watch', 'create', @id, *hash_kv(keys))
end

Dynamic Method Handling

This class handles dynamic methods through the method_missing method in the class TkObject

Class Method Details

.names(state = None) ⇒ Object 



18
19
20
21
22
 
# File 'lib/tkextlib/blt/watch.rb', line 18

def self.names(state = None)
  tk_split_list(tk_call('::blt::watch', 'names', state)).collect{|name|
    WATCH_ID_TBL[name] || name
  }
end

Instance Method Details

#activate ⇒ Object 



58
59
60
61
 
# File 'lib/tkextlib/blt/watch.rb', line 58

def activate
  tk_call('::blt::watch', 'activate', @id)
  self
end

#cget(key) ⇒ Object 



133
134
135
136
137
138
139
140
 
# File 'lib/tkextlib/blt/watch.rb', line 133

def cget(key)
  key = key.to_s
  begin
    info.assoc(key)[1]
  rescue
    fail ArgumentError, "unknown option '#{key}'"
  end
end

#configinfo(slot = nil) ⇒ Object 



116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
 
# File 'lib/tkextlib/blt/watch.rb', line 116

def configinfo(slot = nil)
  if slot
    slot = slot.to_s
    v = cget(slot)
    if TkComm::GET_CONFIGINFO_AS_ARRAY
      [slot, v]
    else
      {slot=>v}
    end
  else
    if TkComm::GET_CONFIGINFO_AS_ARRAY
      info
    else
      Hash[*(info.flatten)]
    end
  end
end

#deactivate ⇒ Object 



62
63
64
65
 
# File 'lib/tkextlib/blt/watch.rb', line 62

def deactivate
  tk_call('::blt::watch', 'deactivate', @id)
  self
end

#delete ⇒ Object 



66
67
68
69
 
# File 'lib/tkextlib/blt/watch.rb', line 66

def delete
  tk_call('::blt::watch', 'delete', @id)
  self
end

#info ⇒ Object 



70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
 
# File 'lib/tkextlib/blt/watch.rb', line 70

def info
  ret = []
  lst = tk_split_simplelist(tk_call('::blt::watch', 'info', @id))
  until lst.empty?
    k, v, *lst = lst
    k = k[1..-1]
    case k
    when /^(#{__strval_optkeys.join('|')})$/
      # do nothing

    when /^(#{__numval_optkeys.join('|')})$/
      begin
        v = number(v)
      rescue
        v = nil
      end

    when /^(#{__numstrval_optkeys.join('|')})$/
      v = num_or_str(v)

    when /^(#{__boolval_optkeys.join('|')})$/
      begin
        v = bool(v)
      rescue
        v = nil
      end

    when /^(#{__listval_optkeys.join('|')})$/
      v = simplelist(v)

    when /^(#{__numlistval_optkeys.join('|')})$/
      v = list(v)

    else
      if v.index('{')
        v = tk_split_list(v)
      else
        v = tk_tcl2ruby(v)
      end
    end

    ret << [k, v]
  end

  ret
end