close

將Perl\Tk改成Ruby\Tk
Perl\Tk版：http://www.wretch.cc/blog/cfcef&article_id=3586468
  require 'tk'
  tmptext=TkVariable.new
  def show(str)
    configure("text"=>str)
  end
  TkButton.new(){
    text "HI"
    command {proc show(tmptext.value)}
    pack("padx"=>5)
  }
  entry=TkEntry.new("textvariable"=>tmptext){
  pack("padx"=>10)
  }
  Tk.mainloop


arrow
arrow
    全站熱搜
    創作者介紹
    創作者 hechian 的頭像
    hechian

    卐只有兩面的盒子卍

    hechian 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄