ruby-iup 0.0.1-i386-mswin32 → 0.0.2-i386-mswin32

data/examples/ctrl/degrade.rb

@@ -8,6 +8,7 @@ def create()
   	puts("CLICK: #{b}: (#{i}, #{j})")
   	Iup::DEFAULT
   }
+
   cells.draw_cb = lambda {|h,i,j,xmin,xmax,ymin,ymax,cnv|
 	  xm = (xmax + xmin) / 2
 	  ym = (ymax + ymin) / 2
@@ -34,6 +35,7 @@ def create()
 	
 	  Iup::DEFAULT
   }
+  
   cells.width_cb = lambda {|h,j| (50+j*1.5).to_i }
   cells.height_cb = lambda {|h,i| (30+i*1.5).to_i }
   cells.nlines_cb = lambda {|h| 7 }
@@ -47,8 +49,8 @@ def create()
 	  return 2 if (i == 1 && j == 1)   
 	  return 2 if (i == 5 && j == 5) 
 	  1
-  }
-  cells.scroll_cb = lambda {|h,i,j| 
+  }  
+  cells.scrolling_cb = lambda {|h,i,j| 
 	  puts("SCROLL: (#{i}, #{j})");
 	  Iup::DEFAULT
   }
@@ -64,6 +66,7 @@ end
 
   dlg = Iup.Dialog(box) 
   dlg.title = "IupCells"
+  dlg.rastersize = "350x250"
   dlg.ShowXY(Iup::CENTER,Iup::CENTER) 
   Iup.MainLoop 
   dlg.Destroy

data/examples/ctrl/iupgauge.rb

@@ -136,15 +136,15 @@ pixmap_show = [
   img_show = Iup.Image(22,22, pixmap_show)
   
   img_start["1"]= "0 0 0" 
-  img_start["2"]= Iup::BGCOLOR
+  img_start["2"]= "BGCOLOR"
   img_play["1"]= "0 0 0" 
-  img_play["2"]= Iup::BGCOLOR 
+  img_play["2"]= "BGCOLOR" 
   img_forward["1"]= "0 0 0" 
-  img_forward["2"]= Iup::BGCOLOR 
+  img_forward["2"]= "BGCOLOR" 
   img_rewind["1"]= "0 0 0" 
-  img_rewind["2"]= Iup::BGCOLOR 
+  img_rewind["2"]= "BGCOLOR" 
   img_show["1"]= "0 0 0" 
-  img_show["2"]= Iup::BGCOLOR 
+  img_show["2"]= "BGCOLOR" 
 
   btn_start = Iup.Button(:title=>"start",:image => img_start,:tip => "Start")
   btn_pause = Iup.Button(:title=>"pause",:image => img_play,:tip => "Pause")

data/examples/ctrl/iupplot2.rb

@@ -235,10 +235,7 @@ class IupPlotTest
 	end
 
 	def tabs_get_index()
-	  curr_tab = @tabs.value
-	  ss = curr_tab.tabtitle
-	  ss = ss[5..-1] # Skip "Plot "
-	  ss.to_i
+	  @tabs.valuepos.to_i
 	end
 
 	def initialize
@@ -246,7 +243,7 @@ class IupPlotTest
 		# will be updated according to current @plot props
 		tabs_tabchange_cb = lambda do |ih, new_tab, old_tab|
 		  ii=0
-		
+
 		  ss = new_tab.tabtitle
 		  ss = ss[5..-1] # Skip "Plot "
 		  ii = ss.to_i

data/examples/dlg/iupalarm.rb

@@ -1,3 +1,5 @@
+#  Shows a dialog similar to the one shown when you exit a program without saving.
+
 require 'rubygems'
 require 'iup'
 
@@ -10,5 +12,5 @@ case(Iup.Alarm("IupAlarm Example","File not saved! Save it now?", "Yes", "No", "
 		Iup.Message("Save file", "Operation canceled")
 end
 
-Iup.MainLoop()
+
 

data/examples/elem/iupbutton.rb

@@ -1,14 +1,14 @@
+#
+#                             IupButton example                             
+#   Description : Creates four buttons. The first uses images, the second   
+#                 turns the first on and off, the third exits the           
+#                 application and the last does nothing                     
+#
+
 require 'rubygems'
-#*****************************************************************************
-#*                             Iup.Button example                             *
-#*        Author : Claudio Coutinho de Biasi                                 *
-#*   Description : Creates four buttons. The first uses images, the second   *
-#*                 turns the first on and off, the third exits the           *
-#*                 application and the last does nothing                     *
-#*****************************************************************************/
 require 'iup'
 
-#* Defines released button's image */
+#* Defines released button's image 
 
 pixmap_release = [
        1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
@@ -30,7 +30,7 @@ pixmap_release = [
        2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
 ]
 
-#* Defines pressed button's image */
+#* Defines pressed button's image 
 pixmap_press = [
        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,
@@ -51,7 +51,7 @@ pixmap_press = [
        2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
 ]
 
-#* Defines inactive button's image */
+#* Defines inactive button's image 
 pixmap_inactive = [
        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,
@@ -72,126 +72,109 @@ pixmap_inactive = [
        2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
 ]
 
-  # Creates a text */
+  # Creates a text 
   text = Iup.Text(:readonly=>"YES")
 
-  # Defines released button's image size */
+  # Defines released button's image size 
   img_release = Iup.Image(16, 16, pixmap_release)
 
-  # Defines released button's image colors */
+  # Defines released button's image colors 
   img_release["1"] = "215 215 215"
   img_release["2"] = "40 40 40"
   img_release["3"] = "30 50 210"
   img_release["4"] = "240 0 0"
 
-  # Associates img_release with handle "img_release" */
-  Iup.SetHandle( "img_release", img_release )
-
-  # Defines pressed button's image size */
+  # Defines pressed button's image size 
   img_press = Iup.Image( 16, 16, pixmap_press )
 
-  # Defines pressed button's image colors */
+  # Defines pressed button's image colors 
   img_press["1"] = "40 40 40"
   img_press["2"] = "215 215 215"
   img_press["3"] = "0 20 180"
   img_press["4"] = "210 0 0"
 
-  # Associates img_press with handle "img_press" */
-  Iup.SetHandle( "img_press", img_press )
-
-  # Defines inactive button's image size */
+  # Defines inactive button's image size 
   img_inactive = Iup.Image( 16, 16, pixmap_inactive )
 
-  # Defines inactive button's image colors */
+  # Defines inactive button's image colors 
   img_inactive["1"] = "215 215 215"
   img_inactive["2"] = "40 40 40"
   img_inactive["3"] = "100 100 100"
   img_inactive["4"] = "200 200 200"
 
-  # Associates img_inactive with handle "img_inactive" */
-  Iup.SetHandle("img_inactive", img_inactive )
+  # Creates a button 
+  btn_image = Iup.Button(:title=>"Button with image",:image=>img_release,:impress=>img_press,:iminactive=>img_inactive)
 
-  # Creates a button */
-  btn_image = Iup.Button(:title=>"Button with image",:image=>"img_release",:impress=>"img_press",:iminactive=>"img_inactive")
-
-  # Creates a button */
+  # Creates a button 
   btn_big = Iup.Button(:title=>"Big useless button",:size=>"EIGHTHxEIGHTH")
 
-  # Creates a button entitled Exit associated with action exit_act */
+  # Creates a button entitled Exit associated with action exit_act 
   btn_exit = Iup.Button("Exit")
 
-  # Creates a button entitled on/off associated with action onoff_act */
+  # Creates a button entitled on/off associated with action onoff_act 
   btn_on_off = Iup.Button("on/off")
 
-  # Creates dialog with the four buttons and the text*/
+  # Creates dialog with the four buttons and the text
   dlg = Iup.Dialog(
           Iup.Vbox([
             Iup.Hbox([
-              Iup.Fill(),
               btn_image,
               btn_on_off,
-              btn_exit,
-              Iup.Fill()]
-            ),
+              btn_exit]),
             text,
-            btn_big]
-          ),
+            btn_big]),
         :expand=>"YES",:title=>"IupButton",:resize=>"NO",
         :menubox=>"NO",:maxbox=>"NO",:minbox=>"NO")
 
 
 	btn_on_off_cb = lambda do |ih|
-	  # If the button with with image is active...*/
+	  # If the button with with image is active...
 	  if(btn_image.active=="YES")
-	    # Deactivates the button with image */
+	    # Deactivates the button with image 
 	    btn_image.active = "NO"
-	  # else it is inactive */
+	  # else it is inactive 
 	  else
-	    # Activates the button with image */
+	    # Activates the button with image 
 	    btn_image.active = "YES"
 	  end
 
-	  # Executed function sucessfully */
+	  # Executed function sucessfully 
 	  Iup::DEFAULT
 	end
 
 	btn_image_button_cb = lambda do |ih,b,e,x,y,status|
-	  # If the left button changed its state... */
-	  if( b == Iup::BUTTON1 )
-	    # If the button was pressed... */
-	    if(e == 1)
-	      # Sets text's value */
+	  # If the left button changed its state... 
+	  if b == Iup::BUTTON1 
+	    # If the button was pressed... 
+	    if e == 1
+	      # Sets text's value 
 	      text.value = "Red button pressed"
-	    # else the button was released */
+	    # else the button was released 
 	    else
-	      # Sets text's value */
+	      # Sets text's value 
 	      text.value = "Red button released"
 	    end
 	  end
 
-	  # Executed function sucessfully */
+	  # Executed function sucessfully 
 	  Iup::DEFAULT
 	end
 
 	btn_exit_cb = lambda do |ih|
-	  # Exits the program */
+	  # Exits the program 
 	  Iup::CLOSE
 	end
 
 
-  # Registers callbacks */
+  # Registers callbacks 
   btn_exit.action = btn_exit_cb
   btn_on_off.action = btn_on_off_cb
   btn_image.button_cb = btn_image_button_cb
 
-  # Shows dialog on the center of the screen */
+  # Shows dialog on the center of the screen 
   dlg.ShowXY(Iup::CENTER, Iup::CENTER )
 
-  # Initializes IUP main loop */
+  # Initializes IUP main loop 
   Iup.MainLoop()
 
   dlg.Destroy()
-  img_release.Destroy()
-  img_inactive.Destroy()
-  img_press.Destroy()
-

data/examples/elem/iupcanvas.rb

@@ -1,3 +1,7 @@
+# IupCanvas example
+# Description : Creates a IUP canvas and uses CD to draw on it
+#      Remark : IUP must be linked to the CD library           
+           
 require 'rubygems'
 require 'iup'
 
@@ -19,9 +23,7 @@ end
   
   cdcanvas = Cd.CreateCanvas( Cd.CD_IUP, cnvs )
   
-  # Shows dialog on the center of the screen */
   dlg.ShowXY(Iup::CENTER, Iup::CENTER )
     
-  # Initializes IUP main loop */
   Iup.MainLoop()
   dlg.Destroy()

data/examples/elem/iupcanvas2.rb

@@ -1,3 +1,7 @@
+# Advanced IupCanvas example
+# Description : This example shows how several canvas callbacks are used and how the scrollbar works.
+#      Remark : IUP must be linked to the CD library                      
+
 require 'rubygems'
 require 'iup'
 
@@ -93,21 +97,18 @@ end
   dlg.ShowXY(Iup::CENTER,Iup::CENTER)
 
   cdcanvas = Cd.CreateCanvas(Cd.CD_IUP, iupcanvas)
-
   if(cdcanvas==nil)
     Iup.Message("IupCanvas","Error creating canvas")
-    dlg.Destroy()
+    dlg.Destroy
     exit
   end
 
   if(cdcanvas.Activate() == Cd::ERROR)
     Iup.Message("IupCanvas","Error creating canvas")
-    dlg.Destroy()
+    dlg.Destroy
     exit
   end
 
-  cdcanvas.CanvasClear()
-
-  # Initializes IUP main loop */
-  Iup.MainLoop()
-  dlg.Destroy()
+  cdcanvas.CanvasClear
+  Iup.MainLoop
+  dlg.Destroy

data/examples/elem/iupcanvas3.rb

@@ -1,49 +1,38 @@
+# IupCanvas Redraw example
+
 require 'rubygems'
 require 'iup'
 
-need_redraw = nil
+need_redraw = 0
+redraw_count = 0
 cdcanvas = nil
 
 
-  gauge = Iup.Gauge()
+  gauge = Iup.ProgressBar()
   cv    = Iup.Canvas()
-  bt    = Iup.Button("Restart")
+  bt    = Iup.Button("Start/Stop")
   bt.size = "50x50"
-  bt.fgcolor = "255 255 255"
   gauge.size = "200x15"
   cv.size = "200x200"
   dlg   = Iup.Dialog(Iup.Vbox([cv, Iup.Hbox([gauge, bt])]),:title=>"Redraw test")
 
 toggle_redraw = lambda do |ih|
+  cdcanvas.CanvasActivate() if cdcanvas
   need_redraw = 1 - need_redraw
   Iup::DEFAULT
 end
 
-fake_redraw = lambda do |ih,posx,posy|
-  need_redraw = 1
-  Iup::DEFAULT
-end
-
 redraw = lambda do
   if(need_redraw == 1)
-    need_redraw = 0
-    bt.fgcolor = "255 0 0"
-    Iup.Flush()
-
-    cdcanvas.CanvasActivate()
-    cdcanvas.CanvasForeground(Cd::BLUE)
-    cdcanvas.CanvasClear()
-
-    for i in 0 ... 300000
-      cdcanvas.CanvasBox(0, 300, 0, i/1000)
-      gauge.value = "%f" % (i/300000.0)
-
-      Iup.LoopStep()
-    end
-
-    bt.fgcolor = "255 255 255"
-    Iup.Flush()
-  end
+      cdcanvas.CanvasBox(0, 300, 0, redraw_count/100)
+      gauge.value = redraw_count/30000.0
+      redraw_count += 1
+      if(redraw_count==30000)
+        cdcanvas.CanvasClear()
+        redraw_count = 0
+        need_redraw = 0
+      end
+  end      
   Iup::DEFAULT
 end
 
@@ -53,8 +42,9 @@ end
   dlg.Map()
   
   cdcanvas = Cd.CreateCanvas(Cd.CD_IUP, cv) 
-  
-  cv.action = fake_redraw
+  cdcanvas.CanvasForeground(Cd::BLUE)
+  cdcanvas.CanvasClear()
+    
   bt.action = toggle_redraw
 
   dlg.ShowXY(Iup::CENTER, Iup::CENTER)

data/examples/elem/iupdialog.rb

@@ -50,22 +50,18 @@ end
   icon["4"] = "128 128 128"
   icon["5"] = "192 192 192"
   icon["6"] = "000 000 255"
-  Iup.SetHandle("icon", icon)
 
   # Creating dialog's content */ 
   quit_bt = Iup.Button(:title=>"Quit",:action=>quit_cb)
-  Iup.SetHandle("quit", quit_bt)
 
   # Creating dialog's menu */ 
   options = Iup.Menu([Iup.Item(:title=>"Exit",:action=>quit_cb)])
   submenu = Iup.Submenu("File", options)
   menu = Iup.Menu([submenu])
-  Iup.SetHandle("menu", menu)
 
   # Creating main dialog */ 
-  dialog = Iup.Dialog(Iup.Vbox([quit_bt]),:title=>"IupDialog",:menu=>"menu",:cursor=>"CROSS",:icon=>"icon",:defaultesc=>"quit")
+  dialog = Iup.Dialog(Iup.Vbox([quit_bt]),:title=>"IupDialog",:menu=>menu,:cursor=>"CROSS",:icon=>icon,:defaultesc=>quit_bt)
 
   dialog.ShowXY(Iup::CENTER, Iup::CENTER)
-  Iup.MainLoop()
-  dialog.Destroy()
-  icon.Destroy()
+  Iup.MainLoop
+  dialog.Destroy