require 'tk'
root = TkRoot.new
#텍스트 입력박스에서 문자를 읽어와서 출력하는 함수
def my_button_function
str = $edit_text.get("1.0", "end")
Tk.messageBox('message'=>str)
end
#$edit_text는 텍스트입력박스입니다.
$edit_text = TkText.new(root) do
pack
end
$button = TkButton.new(root) do
text "click"
#버튼과 함수를 연결합니다
command(proc{my_button_function})
pack
end
Tk.mainloop
스크린샷: