6 nov 2018

Teoría - TK5

=begin
https://www.tutorialspoint.com/ruby/ruby_tk_guide.htm
http://www.es.w3eacademy.com/ruby/ruby_tk_place.htm
=end

require 'tk'

top = TkRoot.new {title "Etiqueta, entrada de texto y botón salir"}
top.geometry('640x480')
top.minsize(400,400)

#code to add a label widget
lb0=TkLabel.new(top){
   text 'Esto es una prueba de colocación de etiquetas, campos y botones en una ventana'
   background "yellow"
   foreground "blue"
   place('relx'=>0.0,'rely'=>0.0)
}
lb1=TkLabel.new(top){
   text '0123456789 '
   background "yellow"
   foreground "blue"
   place('relx'=>0.08,'rely'=>0.08)
}

lb2=TkLabel.new(top){
   text 'Aquí puedes escribir:'
   background "green"
   foreground "black"
   place('relx'=>0.05,'rely'=>0.15)
}
text = TkText.new(top) do
   width 60
   height 15
   borderwidth 1
   font TkFont.new('times 12 bold')
   place('relx'=>0.1,'rely'=>0.2)
end
text.insert 'end', "Hola!\n\nEsto es un ejemplo"
=begin
relx y rely son las posiciones relativas respecto de la ventana
en %, por eso es un número decimal
relx y en rely el decimal es la posición x ó y respectivamente
=end
#code to add a entry widget
e1 = TkEntry.new(top){
   background "red"
   foreground "blue"
   place('relx'=>0.2,'rely'=>0.08)
}
sal = TkButton.new(top) {
 text 'Salir'
 command 'exit'
 place('relx'=>0.9,'rely'=>0.9)
 }
Tk.mainloop

ejercicio TK -1

 #!/usr/bin/ruby #https://sandbox.mc.edu/~bennet/ruby/code/tk2_rb.html # Import the library. require 'tk' # Root window. root = TkRo...