Rubyウィンドウプログラム

2515 ワード

require 'tk'

tkroot=TkRoot.new {

  title 'hellw word'

  geometry '300x200'

}

lb = TkLabel.new(tkroot) do  

  text 'hello'

  font 'arial 20 bold'

  pack :padx=>2,:pady=>2,:side=>'top'#  pack           

end

lb.bind("Enter"){

  lb.text='   '

 

}

Thread.start do  

  while true

    lb.text=Time.new.strftime("%Y-%m-%d %H:%M:%S")

    sleep(1)   

  end

  end



TkButton.new(tkroot){

  text '  '

  command {exit}

  pack :side=>'left',:padx=>10,:pady=>10

}



tkroot.mainloop