ruby-iup 0.1.0-x86-mswin32-60

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/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()

data/examples/elem/iupzbox.rb

@@ -0,0 +1,60 @@
+require 'rubygems'
+require 'iup'
+
+
+  fill = Iup.Fill() 
+
+  text = Iup.Text()
+
+  text.attr = "EXPAND = YES, VALUE = \"Enter your text here\""
+  
+  # Creates a label 
+  lbl = Iup.Label("This element is a label") 
+
+  # Creatas a button 
+  btn = Iup.Button("This button does nothing") 
+
+	
+  # Creates zbox with four elements 
+  zbox = Iup.Zbox([fill, text, lbl, btn]) 
+
+  # Creates handles for manipulating the zbox VALUE 
+  zbox.fill = fill
+  zbox.text = text
+  zbox.lbl = lbl
+  zbox.btn = btn
+
+list_cb = lambda do |h,t, o, selected|
+  if(selected == 1)
+    zbox.value = zbox[t]
+  end
+  Iup::DEFAULT 
+end
+
+  # Sets zbox alignment 
+  zbox.alignment = "ACENTER" 
+
+  # Creates frame 
+  frm = Iup.Frame(
+    Iup.Hbox([
+      Iup.Fill(),
+      list = Iup.List(),
+      Iup.Fill()])
+  )
+
+  # Creates dialog 
+  dlg = Iup.Dialog(
+    Iup.Vbox([
+      frm,
+      zbox])
+  ) 
+
+  list.attr = "1 = fill, 2 = text, 3 = lbl, 4 = btn"
+  frm.title = "Select an element" 
+  dlg.attr = "SIZE = QUARTER, TITLE = \"Iup.Zbox Example\"" 
+  list.action = list_cb 
+
+  dlg.ShowXY(Iup::CENTER, Iup::CENTER ) 
+  Iup.MainLoop() 
+  dlg.Destroy()
+  

data/examples/elem/mdisample.rb

@@ -0,0 +1,377 @@
+require 'rubygems'
+require 'iup'
+
+class MdiTest
+
+	def createImages()
+		img_bits1 = [
+		1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,
+		1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,
+		1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,
+		1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,
+		1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,
+		1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,
+		1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,
+		1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,0,2,0,2,0,2,2,0,2,2,2,0,0,0,2,2,2,0,0,2,0,2,2,0,0,0,2,2,2,
+		2,2,2,0,2,0,0,2,0,0,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2,
+		2,2,2,0,2,0,2,2,0,2,2,0,2,2,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,2,
+		2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,0,2,2,2,0,2,0,0,0,0,0,2,2,
+		2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,2,2,2,
+		2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2,
+		2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,2,0,0,2,0,2,2,0,0,0,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,0,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,0,0,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		1,1,1,1,1,1,1,2,2,2,2,2,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,2,2,2,2,2,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,2,2,2,2,2,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,2,2,2,2,2,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,2,2,2,2,2,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,2,2,2,2,2,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,2,2,2,2,2,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,
+		2,2,2,2,2,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
+		]
+		
+		img_bits2 = [
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,2,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,2,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,2,2,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		3,3,3,0,3,0,3,0,3,3,0,3,3,3,1,1,0,3,3,3,0,0,3,0,3,3,0,0,0,3,3,3,
+		3,3,3,0,3,0,0,3,0,0,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3,
+		3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,3,0,3,0,3,3,3,0,3,0,3,3,3,0,3,3,
+		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,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
+		3,3,3,0,3,0,3,3,0,3,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3,
+		3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,0,0,3,3,0,0,3,0,3,3,0,0,0,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,0,3,3,3,3,3,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,0,3,3,3,0,3,3,3,3,3,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,0,0,0,3,3,3,3,3,3,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,
+		2,2,2,2,2,2,2,3,3,3,3,3,3,3,1,1,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,2,3,3,3,3,3,3,3,3,1,1,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
+		3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
+		]
+	
+		@img1 = Iup.Image(32,32, img_bits1)
+		@img1["0"] = "0 0 0" 
+		@img1["1"] = "BGCOLOR"
+		@img1["2"] = "255 0 0"
+		
+		@img2 = Iup.Image(32,32, img_bits2)
+		@img2["0"] = "0 0 0" 
+		@img2["1"] = "0 255 0"
+		@img2["2"] = "BGCOLOR"
+		@img2["3"] = "255 0 0"
+	end
+	
+	def set_callbacks(ctrl)  
+	
+		action = lambda do |ih|
+		  printf("%2d-action(%s#%s) Value=%s\n", @line, ih.GetClassName(), ih.cindex, ih.value) 
+		  @line+=1
+		  Iup::DEFAULT
+		end
+	
+		getfocus_cb = lambda do |ih|
+		  printf("%2d-getfocus(%s#%s)\n", @line, ih.GetClassName(), ih.cindex)
+		  @line += 1
+		  Iup::DEFAULT
+		end
+		
+		killfocus_cb = lambda do |ih|
+		  printf("%2d-killfocus(%s#%s)\n", @line, ih.GetClassName(), ih.cindex)
+		  @line+=1
+		  Iup::DEFAULT
+		end
+	
+	  ctrl.getfocus_cb = getfocus_cb
+	  ctrl.killfocus_cb = killfocus_cb
+	#  ctrl.action = action
+	  
+	  child = Iup.GetNextChild(ctrl, nil)
+	  while (child)   
+	    set_callbacks(child)  
+	    child = Iup.GetNextChild(ctrl, child)
+	  end
+	end
+	
+	def createDialog()
+	
+	  _frm_1 = Iup.Frame(
+	    Iup.Vbox([
+	      Iup.Button(:title=>"Button Text",:attr=>"CINDEX=1"),
+	      Iup.Button(:attr=> "CINDEX=2, BGCOLOR=\"255 128 0\", RASTERSIZE=30x30"),
+	      Iup.Button(:image=>@img1,:attr=> "CINDEX=3"),
+	      Iup.Button(:image=>@img1,:attr=> "CINDEX=4, FLAT=YES"),
+	      Iup.Button(:image=>@img1,:impress=>@img2,:attr=> "CINDEX=5")
+	      ]),:title=>"IupButton")
+	
+	  _frm_2 = Iup.Frame(
+	    Iup.Vbox([
+	      Iup.Label(:title=>"Label Text\nLine 2\nLine 3",:attr=> "CINDEX=1"),
+	      Iup.Label(:title=>"",:attr => "SEPARATOR=HORIZONTAL,CINDEX=2"),
+	      Iup.Label(:title=>"",:image=>@img1,:attr => "CINDEX=3")
+	      ]),:title=>"IupLabel")
+	
+	  _frm_3 = Iup.Frame(
+	    Iup.Vbox([
+	      Iup.Toggle(:title=>"Toggle Text",:attr=>"VALUE=ON,CINDEX=1"),
+	      Iup.Toggle(:title=>"3State Text",:attr=>"VALUE=NOTDEF,CINDEX=2,3STATE=YES"),
+	      Iup.Toggle(:title=>"",:image=>@img1,:impress=>@img2,:attr=> "CINDEX=3"),
+	      Iup.Frame(Iup.Radio(Iup.Vbox([
+	        Iup.Toggle(:title=>"Toggle Text",:cindex=>4),
+	        Iup.Toggle(:title=>"Toggle Text",:cindex=>5)
+	        ])), :title=>"IupRadio")
+	      ]),:title=>"IupToggle")
+	
+	  _text_1 = Iup.Text( )
+	  _text_1.value = "IupText Text"
+	# _text_1.size = "80x"
+	  _text_1.cindex = 1
+	
+	  _ml_1 = Iup.MultiLine( )
+	  _ml_1.value = "IupMultiline Text\nSecond line\nThird line"
+	#  _ml_1.size = "50x30"
+	#  _ml_1.expand = "YES"
+	#  _ml_1.size = "80x60"
+	  _ml_1.cindex = 1
+	
+	  _frm_4 = Iup.Frame(Iup.Vbox([
+	    _text_1,
+	    _ml_1,
+	    ]),:title=>"IupText/IupMultiline")
+	
+	  _list_1 = Iup.List()
+	  _list_1.expand = "YES"
+	# _list_1.size =  "50x40"
+	  _list_1.value = 1
+	  _list_1.multiple = "YES"  
+	  _list_1["1"] = "Item 1 Text"
+	  _list_1["2"] = "Item 2 Text"
+	  _list_1["3"] = "Item 3 Text Big Item"
+	  _list_1["4"] = "Item 4 Text"
+	  _list_1["5"] = "Item 5 Text"
+	  _list_1["6"] = "Item 6 Text"
+	  _list_1.cindex = 1        
+	
+	  _list_2 = Iup.List( )
+	  _list_2.dropdown="YES"
+	  _list_2.expand="YES"
+	  _list_2.visible_items= 3
+	# _list_2.size= "50x"
+	  _list_2.value=2
+	  _list_2["1"]="Item 1 Text"
+	  _list_2["2"]="Item 2 Text Big Item"
+	  _list_2["3"]="Item 3 Text"
+	  _list_2["4"]="Item 4 Text"
+	  _list_2["5"]="Item 5 Text"
+	  _list_2["6"]="Item 6 Text"
+	  _list_2.cindex=2
+	
+	  _list_3 = Iup.List( )
+	  _list_3.editbox="YES"
+	  _list_3.xpand="YES"
+	# _list_3.size="50x40"
+	  _list_3.value="Test Value"
+	  _list_3["1"]="Item 1 Text"
+	  _list_3["2"]="Item 2 Text Big Item"
+	  _list_3["3"]="Item 3 Text"
+	  _list_3["4"]="Item 4 Text"
+	  _list_3["5"]="Item 5 Text"
+	  _list_3["6"]="Item 6 Text"
+	  _list_3.cindex = 3
+	
+	  _list_4 = Iup.List( )
+	  _list_4.editbox = "YES"
+	  _list_4.dropdown="YES"
+	  _list_4.expand="YES"
+	  _list_4.visible_items = 3
+	# _list_4.size = "50x10"
+	  _list_4.value = "Test Value"
+	  _list_4["1"] = "Item 1 Text"
+	  _list_4["2"] = "Item 2 Text Big Item"
+	  _list_4["3"] = "Item 3 Text"
+	  _list_4["4"] = "Item 4 Text"
+	  _list_4["5"] = "Item 5 Text"
+	  _list_4["6"] = "Item 6 Text"
+	  _list_4.cindex="4"
+	
+	  _frm_5 =  Iup.Frame(Iup.Vbox([
+	      _list_1,
+	      _list_2,
+	      _list_3,
+	      _list_4
+	      ]))
+	  _frm_5.title = "IupList"
+	
+	  _hbox_1 = Iup.Hbox([
+	    _frm_1,
+	    _frm_2,
+	    _frm_3,
+	    _frm_4,
+	    _frm_5
+	    ])
+	
+	  _cnv_1 = Iup.Canvas( "do_nothing")
+	  _cnv_1.bgcolor = "128 255 0"
+	
+	  _vbox_1 = Iup.Vbox([
+	#    Iup.Tabs(_hbox_1, NULL),
+	    _hbox_1,
+	    _cnv_1
+	    ])
+	  _vbox_1.margin = "5x5"
+	  _vbox_1.alignment = "ARIGHT"
+	  _vbox_1.gap = "5"            
+	
+	  set_callbacks(_vbox_1)  
+	
+	  dlg = Iup.Dialog(_vbox_1)
+	  dlg.title = "MDI Child"
+	#  dlg.shrink = "YES"
+	#  dlg.size = "500x200"
+	
+	#  dlg.bgcolor = "255 0 255"
+	#  dlg.font","Times New Roman:ITALIC:10"
+	#  dlg.font = "TIMES_BOLD_14"
+	#  _vbox_1.active = "NO"
+	
+	  #dlg.composited = "YES"
+	  #dlg.layered = "YES"
+	  #dlg.layeralpha = 192
+	
+	#  dlg.Map()
+	#  dlg.size = nil
+	
+	  return dlg
+	end
+	
+	
+	def createMenu()
+	
+		mdi_tilehoriz = lambda do |ih|
+		  Iup.GetDialog(ih).mdiarrange = "TILEHORIZONTAL"
+		  Iup::DEFAULT
+		end
+		
+		mdi_tilevert = lambda do |ih|
+		  Iup.GetDialog(ih).mdiarrange= "TILEVERTICAL"
+		  Iup::DEFAULT
+		end
+		
+		mdi_cascade = lambda do |ih|
+		  Iup.GetDialog(ih).mdiarrange= "CASCADE"
+		  Iup::DEFAULT
+		end
+		
+		mdi_icon = lambda do |ih|
+		  Iup.GetDialog(ih).mdiarrange = "ICON"
+		  Iup::DEFAULT
+		end
+		
+		mdi_next = lambda do |ih|
+		  Iup.GetDialog(ih).mdiactivate = "NEXT"
+		  Iup::DEFAULT
+		end
+		
+		mdi_previous = lambda do |ih|
+		  Iup.GetDialog(ih).mdiactivate = "PREVIOUS"
+		  return Iup::DEFAULT
+		end
+		
+		mdi_closeall = lambda do |ih|
+		  Iup.GetDialog(ih).mdicloseall = nil
+		  Iup::DEFAULT
+		end
+		
+		mdi_activate = lambda do |ih|
+		  printf("%2d-mdi_activate(%s)\n", @line, Iup.GetName(ih))
+		  @line+=1
+		  Iup::DEFAULT
+		end
+		
+		mdi_new = lambda do |ih|	
+		  dlg = createDialog()
+		  dlg.mdichild = "YES"
+		  dlg.parentdialog = "mdiFrame"
+		  dlg.mdiclient = @mdiClient
+		  #dlg.mdiactivate_cb = mdi_activate
+		  #dlg.placement =  "MAXIMIZED"	
+		  dlg.Show()
+	
+		  Iup::DEFAULT
+		end
+	
+	  mnu = Iup.Menu([
+	  	Iup.Submenu("MDI",Iup.Menu([
+	      		Iup.Item("New",mdi_new)])),
+	      winmenu = Iup.Submenu("Window", 
+	        Iup.Menu([
+		      Iup.Item("Tile Horizontal", mdi_tilehoriz), 
+		      Iup.Item("Tile Vertical", mdi_tilevert), 
+		      Iup.Item("Cascade", mdi_cascade), 
+		      Iup.Item("Icon Arrange", mdi_icon), 
+		      Iup.Item("Close All", mdi_closeall), 
+		      Iup.Separator(),
+		      Iup.Item("Next", mdi_next), 
+		      Iup.Item("Previous", mdi_previous) 
+	      ]))
+	    ])
+	  @mdiMenu = winmenu
+	  @mnu = mnu
+	end
+	
+	def createFrame()
+	  cnv = Iup.Canvas( "do_nothing")
+	  cnv.mdiclient = "YES"
+	  cnv.mdimenu = @mdiMenu
+	  @mdiClient = cnv
+	
+	  dlg = Iup.Dialog(cnv)
+	  dlg.title = "MDI Frame"
+	  dlg.mdiframe = "YES"
+	  dlg.rastersize = "800x600"
+	  Iup.SetHandle("mdiFrame",dlg)
+	  
+	  dlg
+	end
+
+	def initialize	
+	  @line = 0
+	  createImages()
+	  createMenu()
+	  dlg = createFrame() 
+	# dlg.placement = "MAXIMIZED"
+	  dlg.menu = @mnu
+	  dlg.ShowXY(Iup::CENTER,Iup::CENTER)
+	  Iup.MainLoop()
+	  @img1.Destroy
+	  @img2.Destroy
+	  dlg.Destroy
+	end
+	
+end
+
+test = MdiTest.new