Guest

Untitled

By: a guest on Jan 28th, 2012  |  syntax: None  |  size: 1.00 KB  |  hits: 14  |  expires: Never
download  |  raw  |  embed  |  report abuse
Copied
  1. #! /usr/bin/ruby
  2.  
  3. require 'tk'
  4.  
  5.  
  6.  
  7. def myproc(entry1, entry2)
  8.   puts entry1
  9.  
  10. end
  11.  
  12.  
  13.  
  14. root = TkRoot.new
  15. root.title = "Camera Downloader V.01"
  16.  
  17. entry1 = TkEntry.new(root)
  18. entry2 = TkEntry.new(root)
  19.  
  20. variable1 = TkVariable.new
  21. variable2 = TkVariable.new
  22. entry1.textvariable = variable1
  23. entry2.textvariable = variable2
  24. variable1.value = "Enter any text value"
  25. variable2.value = "Enter any confidential value"
  26.  
  27. btn_OK = TkButton.new(root) do
  28.   text "OK"
  29.   borderwidth 5
  30.   underline 0
  31.   state "normal"
  32.   cursor "watch"
  33.   font TkFont.new('times 20 bold')
  34.   foreground  "red"
  35.   activebackground "blue"
  36.   relief      "groove"
  37.   command (proc {myproc(variable1, variable2)})
  38.   pack("side" => "bottom","padx"=> "50", "pady"=> "100"
  39. )
  40. end
  41.  
  42.  
  43. entry1.place('height' => 25,
  44.             'width'  => 150,
  45.             'x'      => 10,
  46.             'y'      => 10)
  47.  
  48. entry2.place('height' => 25,
  49.             'width'  => 150,
  50.             'x'      => 10,
  51.             'y'      => 40)
  52.  
  53. Tk.mainloop