Module: TkXIM

Extended by:
Tk
Includes:
Tk
Defined in:
lib/tk/xim.rb

Constant Summary collapse

TkCommandNames =
['imconfigure'.freeze].freeze

Constants included from Tk

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

Constants included from Tk::Encoding

Tk::Encoding::BINARY, Tk::Encoding::BINARY_NAME, Tk::Encoding::DEFAULT_EXTERNAL_NAME, Tk::Encoding::DEFAULT_INTERNAL_NAME, Tk::Encoding::ENCODING_TABLE, Tk::Encoding::RubyEncoding, Tk::Encoding::UNKNOWN, Tk::Encoding::UTF8_NAME

Constants included from TkCore

TkCore::EventFlag, TkCore::INTERP, TkCore::INTERP_MUTEX, TkCore::INTERP_ROOT_CHECK, TkCore::INTERP_THREAD, TkCore::INTERP_THREAD_STATUS, TkCore::RUN_EVENTLOOP_ON_MAIN_THREAD, TkCore::WIDGET_DESTROY_HOOK, TkCore::WITH_ENCODING, TkCore::WITH_RUBY_VM

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

Class Method Summary collapse

Instance Method Summary collapse

Methods included from Tk

BinaryString, EncodedString, Grid, Pack, Place, UTF8_String, __create_widget_set__, __disable_toplevel_control__, __import_toplevel_aliases__, __regist_toplevel_aliases__, __remove_toplevel_aliases__, __reset_toplevel_owner__, __set_loaded_toplevel_aliases__, __set_toplevel_aliases__, __toplevel_alias_setup_proc__, add_kinsoku, bell, bell_on_display, const_missing, current_grabs, cursor_display, default_widget_set, default_widget_set=, 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, sleep, 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, toplevel_aliases_on_widget_set, ungrid, unload_tcllibrary, unpack, unplace, update, update, update_idletasks, utf_to_backslash, utf_to_backslash_sequence, wakeup, widget_set_symbols

Methods included from Tk::Encoding

#default_encoding=, #encoding=, #encoding_convertfrom, #encoding_convertto, #encoding_dirs, #encoding_dirs=, #encoding_name, #encoding_names, #encoding_obj, #encoding_objs, #encoding_system=, #encoding_system_name, #encoding_system_obj, #force_default_encoding, #force_default_encoding=, #force_default_encoding?, #tk_encoding_names

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, #info, #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, install_cmd, list, num_or_nil, num_or_str, number, procedure, simplelist, slice_ary, string, #subst, tk_tcl2ruby, uninstall_cmd, #uninstall_cmd, window

Methods included from TkEvent

#install_bind, #install_bind_for_event_class

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_nil, num_or_nil, num_or_str, #num_or_str, number, #number, string, #string, uninstall_cmd, untrust

Class Method Details

.caret(win, keys = nil) ⇒ Object



34
35
36
37
38
39
40
41
42
43
44
45
46
# File 'lib/tk/xim.rb', line 34

def TkXIM.caret(win, keys=nil)
  if keys
    tk_call_without_enc('tk', 'caret', win, *hash_kv(keys))
    self
  else
    lst = tk_split_list(tk_call_without_enc('tk', 'caret', win))
    info = {}
    while key = lst.shift
      info[key[1..-1]] = lst.shift
    end
    info
  end
end

.configinfo(win, slot = nil) ⇒ Object



61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
# File 'lib/tk/xim.rb', line 61

def TkXIM.configinfo(win, slot=nil)
  if TkComm::GET_CONFIGINFOwoRES_AS_ARRAY
    begin
      if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
        if slot
          conf = tk_split_list(tk_call('imconfigure', win, "-#{slot}"))
          conf[0] = conf[0][1..-1]
          conf
        else
          tk_split_list(tk_call('imconfigure', win)).collect{|conf|
            conf[0] = conf[0][1..-1]
            conf
          }
        end
      else
        []
      end
    rescue
      []
    end
  else # ! TkComm::GET_CONFIGINFOwoRES_AS_ARRAY
    TkXIM.current_configinfo(win, slot)
  end
end

.configure(win, slot, value = None) ⇒ Object



48
49
50
51
52
53
54
55
56
57
58
59
# File 'lib/tk/xim.rb', line 48

def TkXIM.configure(win, slot, value=None)
  begin
    if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
      if slot.kind_of? Hash
        tk_call('imconfigure', win, *hash_kv(slot))
      else
        tk_call('imconfigure', win, "-#{slot}", value)
      end
    end
  rescue
  end
end

.current_configinfo(win, slot = nil) ⇒ Object



86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
# File 'lib/tk/xim.rb', line 86

def TkXIM.current_configinfo(win, slot=nil)
  begin
    if /^8\.*/ === Tk::TK_VERSION  && JAPANIZED_TK
      if slot
        conf = tk_split_list(tk_call('imconfigure', win, "-#{slot}"))
        { conf[0][1..-1] => conf[1] }
      else
        ret = {}
        tk_split_list(tk_call('imconfigure', win)).each{|conf|
          ret[conf[0][1..-1]] = conf[1]
        }
        ret
      end
    else
      {}
    end
  rescue
    {}
  end
end

.useinputmethods(value = None, win = nil) ⇒ Object



12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
# File 'lib/tk/xim.rb', line 12

def TkXIM.useinputmethods(value = None, win = nil)
  if value == None
    if win
      bool(tk_call_without_enc('tk', 'useinputmethods',
                               '-displayof', win))
    else
      bool(tk_call_without_enc('tk', 'useinputmethods'))
    end
  else
    if win
      bool(tk_call_without_enc('tk', 'useinputmethods',
                               '-displayof', win, value))
    else
      bool(tk_call_without_enc('tk', 'useinputmethods', value))
    end
  end
end

.useinputmethods_displayof(win, value = None) ⇒ Object



30
31
32
# File 'lib/tk/xim.rb', line 30

def TkXIM.useinputmethods_displayof(win, value = None)
  TkXIM.useinputmethods(value, win)
end

Instance Method Details

#caret(keys = nil) ⇒ Object



111
112
113
# File 'lib/tk/xim.rb', line 111

def caret(keys=nil)
  TkXIM.caret(self, keys=nil)
end

#imconfiginfo(slot = nil) ⇒ Object



119
120
121
# File 'lib/tk/xim.rb', line 119

def imconfiginfo(slot=nil)
  TkXIM.configinfo(self, slot)
end

#imconfigure(slot, value = None) ⇒ Object



115
116
117
# File 'lib/tk/xim.rb', line 115

def imconfigure(slot, value=None)
  TkXIM.configure(self, slot, value)
end

#useinputmethods(value = None) ⇒ Object



107
108
109
# File 'lib/tk/xim.rb', line 107

def useinputmethods(value=None)
  TkXIM.useinputmethods(value, self)
end