ruby--ruby/ext/tk/sample/demos-jp/dialog1.rb

#
# a dialog box with a local grab (called by 'widget')
#
class TkDialog_Demo1 < TkDialog
  ###############
  private
  ###############
  def title
    "Dialog with local grab"
  end

  def message
    '<27>⡼<EFBFBD><E2A1BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܥå<DCA5><C3A5><EFBFBD><EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD>Tk <20><> "grab" <20><><EFBFBD>ޥ<EFBFBD><DEA5>ɤ<EFBFBD><C9A4><EFBFBD><EFBFBD>Ѥ<EFBFBD><D1A4>ƥ<EFBFBD><C6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܥå<DCA5><C3A5><EFBFBD><EFBFBD>ǡ֥<C7A1><D6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>륰<EFBFBD><EBA5B0><EFBFBD>֡פ<D6A1><D7A4>Ƥ<EFBFBD><C6A4>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD>줫<EFBFBD>Υܥ<CEA5><DCA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¹Ԥ<C2B9><D4A4>뤳<EFBFBD>Ȥˤ<C8A4><CBA4>äơ<C3A4><C6A1><EFBFBD><EFBFBD>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤǡ<DEA4><C7A1><EFBFBD><EFBFBD>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD>֤ˤ<D6A4><CBA4>äƥ<C3A4><C6A5>ץꥱ<D7A5><EAA5B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¾<EFBFBD>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɥ<EFBFBD><C9A5>Ǥϡ<C7A4><CFA1>ݥ<EFBFBD><DDA5>󥿴ط<F3A5BFB4><D8B7>Υ<EFBFBD><CEA5>٥<EFBFBD><D9A5>Ȥ<EFBFBD><C8A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>뤳<EFBFBD>Ȥ<EFBFBD><C8A4>Ǥ<EFBFBD><C7A4>ʤ<EFBFBD><CAA4>ʤäƤ<C3A4><C6A4>ޤ<EFBFBD><DEA4><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_Demo1.new('message_config'=>{'wraplength'=>'4i'}).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 'dialog1'
end