1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/ext/tk/sample/demos-jp/dialog2.rb

44 lines
1 KiB
Ruby
Raw Normal View History

* encoding.c: provide basic features for M17N. * parse.y: encoding aware parsing. * parse.y (pragma_encoding): encoding specification pragma. * parse.y (rb_intern3): encoding specified symbols. * string.c (rb_str_length): length based on characters. for older behavior, bytesize method added. * string.c (rb_str_index_m): index based on characters. rindex as well. * string.c (succ_char): encoding aware succeeding string. * string.c (rb_str_reverse): reverse based on characters. * string.c (rb_str_inspect): encoding aware string description. * string.c (rb_str_upcase_bang): encoding aware case conversion. downcase, capitalize, swapcase as well. * string.c (rb_str_tr_bang): tr based on characters. delete, squeeze, tr_s, count as well. * string.c (rb_str_split_m): split based on characters. * string.c (rb_str_each_line): encoding aware each_line. * string.c (rb_str_each_char): added. iteration based on characters. * string.c (rb_str_strip_bang): encoding aware whitespace stripping. lstrip, rstrip as well. * string.c (rb_str_justify): encoding aware justifying (ljust, rjust, center). * string.c (str_encoding): get encoding attribute from a string. * re.c (rb_reg_initialize): encoding aware regular expression * sprintf.c (rb_str_format): formatting (i.e. length count) based on characters. * io.c (rb_io_getc): getc to return one-character string. for older behavior, getbyte method added. * ext/stringio/stringio.c (strio_getc): ditto. * io.c (rb_io_ungetc): allow pushing arbitrary string at the current reading point. * ext/stringio/stringio.c (strio_ungetc): ditto. * ext/strscan/strscan.c: encoding support. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13261 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2007-08-24 23:29:39 -04:00
# -*- coding: euc-jp -*-
#
# a dialog box with a global grab (called by 'widget')
#
class TkDialog_Demo2 < TkDialog
###############
private
###############
def title
"Dialog with global grab"
end
def message
'<27><><EFBFBD>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܥå<DCA5><C3A5><EFBFBD><EFBFBD>ϥ<EFBFBD><CFA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Х<D0A5><EBA5B0><EFBFBD>֤<EFBFBD><D6A4><EFBFBD><EFBFBD>Ѥ<EFBFBD><D1A4>Ƥ<EFBFBD><C6A4>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Υܥ<CEA5><DCA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¹Ԥ<C2B9><D4A4><EFBFBD><EFBFBD>ޤǡ<DEA4><C7A1>ǥ<EFBFBD><C7A5><EFBFBD><EFBFBD>ץ쥤<D7A5><ECA5A4><EFBFBD>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD>ʤ<EFBFBD><CAA4><EFBFBD><EFBFBD>ΤȤ<CEA4><C8A4><EFBFBD><EFBFBD>äǤ<C3A4><C7A4>ޤ<EFBFBD><DEA4>󡣥<EFBFBD><F3A1A3A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Х<D0A5><EBA5B0><EFBFBD>֤<EFBFBD><D6A4><EFBFBD><EFBFBD>Ѥ<EFBFBD><D1A4><EFBFBD>Ȥϡ<C8A4><CFA1>ޤ<EFBFBD><DEA4>ɤ<EFBFBD><C9A4>ͤ<EFBFBD><CDA4>ǤϤ<C7A4><CFA4><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4>󡣤ɤ<F3A1A3A4><C9A4><EFBFBD><EFBFBD>Ƥ<EFBFBD>ɬ<EFBFBD>פˤʤ<CBA4><CAA4>ޤǻȤ<C7BB><C8A4><EFBFBD><EFBFBD>Ȼפ<C8BB><D7A4>ʤ<EFBFBD><CAA4>Dz<EFBFBD><C7B2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
end
def bitmap
'info'
end
def default_button
0
end
def buttons
# "λ<><CEBB> <20><><EFBFBD><EFBFBD><EFBFBD>󥻥<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ɻ<EFBFBD><C9BB><EFBFBD>"
["λ<EFBFBD><EFBFBD>", "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󥻥<EFBFBD>", "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɻ<EFBFBD><EFBFBD><EFBFBD>"]
end
end
ret = TkDialog_Demo2.new('message_config'=>{'wraplength'=>'4i'},
'prev_command'=>proc{|dialog|
Tk.after 100, proc{dialog.grab('global')}
}).value
case ret
when 0
print "<EFBFBD><EFBFBD><EFBFBD>ʤ<EFBFBD><EFBFBD>ϡ<EFBFBD>λ<EFBFBD><EFBFBD><EFBFBD>פ򲡤<EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>͡<EFBFBD>\n"
when 1
print "<EFBFBD><EFBFBD><EFBFBD>ʤ<EFBFBD><EFBFBD>ϡ֥<EFBFBD><EFBFBD><EFBFBD><EFBFBD>󥻥<EFBFBD><EFBFBD>פ򲡤<EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>͡<EFBFBD>\n"
when 2
showCode 'dialog2'
end