ruby-iup 0.0.1-i386-mswin32

data/examples/elem/iupseparator.rb

@@ -0,0 +1,81 @@
+require 'rubygems'
+require 'iup'
+
+def show_message()
+  Iup.Message("Warning", "This item performs no operation\nIt is here only to compose") 
+end
+
+item_new_cb = lambda do |ih|
+  show_message()   
+  Iup::DEFAULT 
+end
+
+item_open_cb = lambda do |ih|
+  show_message()  
+  Iup::DEFAULT 
+end
+
+item_close_cb = lambda do |ih|
+  show_message()   
+  Iup::DEFAULT 
+end
+ 
+item_pagesetup_cb = lambda do |ih|
+  show_message()   
+  Iup::DEFAULT 
+end
+
+item_print_cb = lambda do |ih|
+  show_message()   
+  Iup::DEFAULT 
+end
+
+item_exit_cb = lambda do |ih|
+  Iup::CLOSE 
+end
+
+  # Creates a text */
+  text = Iup.Text() 
+  
+  # Sets value of the text and turns on expand */ 
+  text.attr = "VALUE = \"This text is here only to compose\", EXPAND = YES" 
+ 
+  # Creates six items */
+  item_new = Iup.Item("New")
+  item_open = Iup.Item("Open")
+  item_close = Iup.Item("Close")
+  item_pagesetup = Iup.Item("Page Setup")
+  item_print = Iup.Item("Page Setup")
+  item_exit = Iup.Item("Exit")
+
+  # Registers callbacks */
+  item_new.action = item_new_cb 
+  item_open.action = item_open_cb 
+  item_close.action = item_close_cb 
+  item_pagesetup.action = item_pagesetup_cb 
+  item_print.action = item_print_cb 
+  item_exit.action = item_exit_cb 
+
+  # Creates file menu */
+  menu_file = Iup.Menu([item_new, item_open, item_close, Iup.Separator(), item_pagesetup, item_print, Iup.Separator(), item_exit]) 
+
+  # Creates file submenu */
+  submenu_file = Iup.Submenu("File", menu_file) 
+  
+  # Creates main menu with file menu */
+  menu = Iup.Menu([submenu_file]) 
+ 
+  # Creates dialog with a text */
+  dlg = Iup.Dialog(text,:menu=>menu) 
+
+  # Sets title and size of the dialog and associates a menu to it */
+  dlg.attr = "TITLE=\"Iup.Separator Example\", SIZE = QUARTERxEIGHTH" 
+
+  # Shows dialog in the center of the screen */
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
+
+  # Initializes IUP main loop */
+  Iup.MainLoop() 
+
+  dlg.Destroy()
+

data/examples/elem/iupsubmenu.rb

@@ -0,0 +1,85 @@
+require 'rubygems'
+require 'iup'
+
+item_help_cb = lambda do |ih|
+  Iup.Message("Warning", "Only Help and Exit items performs an operation") 
+  
+  Iup::DEFAULT 
+end
+
+
+item_exit_cb = lambda do |ih|
+  Iup::CLOSE 
+end
+
+  # Creates a multiline */
+  text = Iup.Text() 
+  
+  # Sets value of the text and turns on expand */ 
+  text.attr = "VALUE = \"This text is here only to compose\", EXPAND = YES" 
+     
+  # Creates items of menu file */
+  item_new = Iup.Item("New") 
+  item_open = Iup.Item("Open") 
+  item_close = Iup.Item("Close") 
+  item_exit = Iup.Item("Exit", "item_exit_act") 
+
+  # Creates items of menu edit */
+  item_copy = Iup.Item("Copy") 
+  item_paste = Iup.Item("Paste") 
+
+  # Creates items for menu triangle */
+  item_scalenus = Iup.Item("Scalenus") 
+  item_isoceles = Iup.Item("Isoceles") 
+  item_equilateral = Iup.Item("Equilateral") 
+
+  # Create menu triangle */
+  menu_triangle = Iup.Menu([item_equilateral, item_isoceles, item_scalenus]) 
+
+  # Creates submenu triangle */
+  submenu_triangle = Iup.Submenu("Triangle", menu_triangle) 
+
+  # Creates items for menu create */
+  item_line = Iup.Item("Line") 
+  item_circle = Iup.Item("Circle") 
+
+  # Creates menu create */
+  menu_create = Iup.Menu([item_line, item_circle, submenu_triangle]) 
+
+  # Creates submenu create */
+  submenu_create = Iup.Submenu("Create", menu_create) 
+
+  # Creates items of menu help */
+  item_help = Iup.Item("Help", "item_help_act") 
+  
+  # Creates three menus */
+  menu_file = Iup.Menu([item_new, item_open, item_close, Iup.Separator(), item_exit]) 
+  menu_edit = Iup.Menu([item_copy, item_paste, Iup.Separator(), submenu_create])
+  menu_help = Iup.Menu([item_help])
+
+  # Creates three submenus */
+  submenu_file = Iup.Submenu("File", menu_file) 
+  submenu_edit = Iup.Submenu("Edit", menu_edit) 
+  submenu_help = Iup.Submenu("Help", menu_help) 
+  
+  # Creates main menu with file menu */
+  menu = Iup.Menu([submenu_file, submenu_edit, submenu_help]) 
+
+  # Registers callbacks */
+  item_help.action = item_help_cb 
+  item_exit.action = item_exit_cb 
+                                 
+  # Creates dialog with a text */
+  dlg = Iup.Dialog(text,:menu=>menu) 
+
+  # Sets title and size of the dialog and associates a menu to it */
+  dlg.attr = "TITLE=\"Iup.Submenu Example\", SIZE = QUARTERxEIGHTH" 
+
+  # Shows dialog in the center of the screen */
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
+
+  # Initializes IUP main loop */
+  Iup.MainLoop() 
+
+  dlg.Destroy()
+

data/examples/elem/iuptext.rb

@@ -0,0 +1,61 @@
+require 'rubygems'
+require 'iup'
+
+  password = ""
+
+  pwd = Iup.Text(:readonly=>"YES",:size=>"200x")
+
+	k_any = lambda do |ih, c|
+	  case c
+	    when
+	     Iup::K_CR,
+	     Iup::K_SP,
+	     Iup::K_ESC,
+	     Iup::K_INS,
+	     Iup::K_DEL,
+	     Iup::K_TAB,
+	     Iup::K_HOME,
+	     Iup::K_UP,
+	     Iup::K_PGUP,
+	     Iup::K_LEFT,
+	     Iup::K_MIDDLE,
+	     Iup::K_RIGHT,
+	     Iup::K_END,
+	     Iup::K_DOWN,
+	     Iup::K_PGDN
+	      return Iup::IGNORE
+	    else
+	      return Iup::DEFAULT
+	  end
+	end
+	
+	action = lambda do |ih, c, after|
+	  size = password.size
+	  case c  
+	    when Iup::K_BS
+	      if (size==0)
+	        return Iup::IGNORE
+	      end
+	      password.chop!
+	      pwd.value = password
+	      return Iup::DEFAULT
+	    else
+	      if (k_any.call(ih, c) == Iup::IGNORE)
+	        return Iup::IGNORE
+	      end
+	      password += c.chr
+	  end
+	  pwd.value = password
+	  Iup::K_asterisk
+	end
+	
+
+  text = Iup.Text(:size=>"200x",:action=>action,:k_any=>k_any)
+
+  dlg = Iup.Dialog(Iup.Vbox([text, pwd]),:title=>"IupText")
+
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  Iup.MainLoop()
+  dlg.Destroy()
+

data/examples/elem/iuptimer.rb

@@ -0,0 +1,36 @@
+require 'rubygems'
+require 'iup'
+
+
+  text = Iup.Label("Timer example")
+
+  # Creating main dialog */
+  dialog = Iup.Dialog(Iup.Vbox([text]),:title=>"timer example",:size=>"200x200")
+  dialog.ShowXY(Iup::CENTER, Iup::CENTER)
+
+  timer1 = Iup.Timer()
+  timer2 = Iup.Timer()
+
+	timer_cb = lambda do |n|
+	  if(n == timer1)
+	    puts("timer 1 called")
+	  end
+	  if(n == timer2)
+	    puts("timer 2 called")
+	    return Iup::CLOSE  
+	  end
+	
+	  Iup::DEFAULT
+	end
+
+  timer1.time = 100
+  timer1.run = "YES"
+  timer1.action_cb = timer_cb
+        
+  timer2.time = 400
+  timer2.run = "YES"
+  timer2.action_cb = timer_cb
+
+  Iup.MainLoop()
+  timer1.Destroy()
+  timer2.Destroy()

data/examples/elem/iuptoggle.rb

@@ -0,0 +1,110 @@
+require 'rubygems'
+require 'iup'
+
+img_1 = [
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,2,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,2,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,2,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,2,2,2,2,2,2,2,2,2,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+]
+
+img_2 = [
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,2,2,2,2,2,2,1,1,1,1,1,1,
+  1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,2,2,2,2,2,2,2,2,2,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+]
+
+
+
+toggle1cb = lambda do |ih,v|
+  if(v == 1)
+  	Iup.Message("Toggle 1","pressed") 
+  else 
+  	Iup.Message("Toggle 1","released") 
+  end
+
+  Iup::DEFAULT
+end
+
+  img1 = Iup.Image(16,16, img_1)
+  img2 = Iup.Image(16,16, img_2)
+  img1["1"] = "255 255 255" 
+  img1["2"] = "0 192 0" 
+  img2["1"] = "255 255 255" 
+  img2["2"] = "0 192 0" 
+
+  toggle1 = Iup.Toggle("toggle with image")
+  toggle2 = Iup.Toggle("deactivated toggle with image")
+  toggle3 = Iup.Toggle("regular toggle")
+  toggle4 = Iup.Toggle("toggle with blue foreground color")
+  toggle5 = Iup.Toggle("toggle with red background color")
+  toggle6 = Iup.Toggle("toggle with black background color and green foreground color")
+  toggle7 = Iup.Toggle("deactivated toggle")
+  toggle8 = Iup.Toggle("toggle with Courier 14 Bold font")
+  toggle9 = Iup.Toggle("toggle with size EIGHTxEIGHT")
+	
+  toggle1.action = toggle1cb
+  
+  toggle1.image = img1                  # Toggle 1 uses image                 
+  toggle2.image = img2                  # Toggle 2 uses image                 
+  toggle2.active = "NO"                 # Toggle 2 inactive                   
+  toggle4.fgcolor = "0 0 255"           # Toggle 4 has blue foreground color  
+  toggle5.bgcolor = "255 0 0"           # Toggle 5 has red background color   
+  toggle6.fgcolor = "0 255 0"           # Toggle 6 has green foreground color 
+  toggle6.bgcolor = "0 0 0"             # Toggle 6 has black background color 
+  toggle7.active =  "NO"                # Toggle 7 inactive                   
+  toggle8.font =    "COURIER_BOLD_14"   # Toggle 8 has Courier 14 Bold font   
+  toggle9.size =    "EIGHTHxEIGHTH"     # Toggle 9 has size EIGHTxEIGHT       
+
+  # Creating box that contains the toggles 
+  caixa = 
+    Iup.Vbox([
+      toggle1, 
+      toggle2, 
+      toggle3, 
+      toggle4, 
+      toggle5, 
+      toggle6, 
+      toggle7, 
+      toggle8, 
+      toggle9])
+
+  toggles = Iup.Radio( caixa ) # Grouping toggles 
+  toggles.expand = "YES"
+
+  # Dialog 
+  dlg = Iup.Dialog(toggles)
+  dlg.tile = "IupToggle" 
+  dlg.attr = "MARGIN=5x5, GAP=5, RESIZE=NO" 
+
+  # Associates a menu to the dialog 
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
+  Iup.MainLoop()
+  dlg.Destroy()
+  img1.Destroy
+  img2.Destroy

data/examples/elem/iupvbox.rb

@@ -0,0 +1,87 @@
+require 'rubygems'
+require 'iup'
+
+  # Creates frame 1 
+  frm_1 = Iup.Frame(
+    Iup.Hbox([
+      Iup.Fill(),
+      vbox_1 = Iup.Vbox([
+        btn_11=Iup.Button("1"),
+        btn_12=Iup.Button("2"),
+        btn_13=Iup.Button("3")]),
+      Iup.Fill()])
+  ) 
+
+  # Sets title of frame 1 
+  frm_1.title = "ALIGNMENT = ALEFT, GAP = 10" 
+
+  # Sets attributes of buttons inside frame 1 
+  btn_11.size = "20x30" 
+  btn_12.size = "30x30" 
+  btn_13.size = "40x30" 
+
+  # Sets attributes of vbox 1 
+  vbox_1.attr = "ALIGNMENT = ALEFT, GAP = 10" 
+
+  # Creates frame 2 
+  frm_2 = Iup.Frame(
+    Iup.Hbox([
+      Iup.Fill(),
+      vbox_2 = Iup.Vbox([
+        btn_21 = Iup.Button("1"),
+        btn_22 = Iup.Button("2"),
+        btn_23 = Iup.Button("3")]),
+      Iup.Fill()])
+  )
+
+  # Sets title of frame 1 
+  frm_2.title = "ALIGNMENT = ACENTER, MARGIN = 15" 
+
+  # Sets attributes of buttons inside frame 2 
+  btn_21.size = "20x30" 
+  btn_22.size = "30x30" 
+  btn_23.size = "40x30" 
+
+  # Sets attributes of vbox 2 
+  vbox_2.attr = "ALIGNMENT = ACENTER, MARGIN = 15" 
+
+  # Creates frame 3 
+  frm_3 = Iup.Frame(
+    Iup.Hbox([
+      Iup.Fill(),
+      vbox_3 = Iup.Vbox([
+        btn_31=Iup.Button("1"),
+        btn_32=Iup.Button("2"),
+        btn_33=Iup.Button("3")]),
+      Iup.Fill()])
+  ) 
+
+  # Sets title of frame 3 
+  frm_3.title = "ALIGNMENT = ARIGHT, SIZE = 20"
+
+  # Sets attributes of buttons inside frame 3 
+  btn_31.size = "20x30" 
+  btn_32.size = "30x30" 
+  btn_33.size = "40x30" 
+
+  # Sets attributes of vbox 3 
+  vbox_3.attr = "ALIGNMENT = ARIGHT, SIZE = 20"
+
+  # Creates dialog with three frames inside a vbo_ 
+  dlg = Iup.Dialog(
+    Iup.Vbox([
+      frm_1,
+      frm_2,
+      frm_3])
+  ) 
+
+  # Sets title and size of the dialog 
+  dlg.attr = "TITLE = \"Iup.Vbox Example\", SIZE = QUARTER"
+
+  # Shows dialog in the center of the screen 
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER) 
+
+  # Initializes IUP main loop 
+  Iup.MainLoop() 
+
+  dlg.Destroy()