rbcurse 1.4.1 → 1.5.0.pre1

data/examples/deprecated/testtpane2.rb

@@ -1,145 +0,0 @@
-#*******************************************************#
-#                      testtpane2.rb                    #
-#                 written by Rahul Kumar                #
-#                    February 1, 2010                   #
-#                                                       #
-#     testing tabbedpane with textarea, view, listbox   #
-#     Differs from testtpane added scrollpanes outside view #
-#                                                       #
-#            Released under ruby license. See           #
-#         http://www.ruby-lang.org/en/LICENSE.txt       #
-#               Copyright 2010, Rahul Kumar             #
-#*******************************************************#
-
-# this is a test program, tests out tabbed panes. type F1 to exit
-#
-#$LOAD_PATH << "/Users/rahul/work/projects/rbcurse/"
-require 'rubygems'
-#require 'ncurses' # FFI
-require 'logger'
-require 'rbcurse'
-require 'rbcurse/rtabbedpane'
-require 'rbcurse/rtextview'
-require 'rbcurse/rtextarea'
-require 'rbcurse/rscrollpane'
-
-class TestTabbedPane
-  def initialize
-    acolor = $reversecolor
-  end
-  def run
-    $config_hash ||= Variable.new Hash.new
-    @window = VER::Window.root_window
-    @form = Form.new @window
-    @form.name = "MAINFORM"
-    $log.debug " MAIN FORM #{@form}  , #{@window} "
-    r = 3; c = 5;
-    h = 20; w = 70
-      @tp = RubyCurses::TabbedPane.new @form  do
-        height h
-        width  w
-        row r #5
-        col c #8
-        #button_type :ok
-      end
-      sr = 4 
-      sc = 2
-        @scroll = ScrollPane.new nil do
-          name   "myScroller" 
-         # row 4 #+ht+1
-         # col 0
-         # width w-1
-         # height h-4
-        end
-        textview = TextView.new do
-          name   "myView" 
-          row 0 #sr+1 # 4
-          col 0 #sc+1 # 2 
-          width w-0
-         # height h+10
-          title "README.mrku"
-          title_attrib 'bold'
-          print_footer true
-          footer_attrib 'bold'
-        end
-        content = File.open("../README.markdown","r").readlines
-        textview.set_content content #, :WRAP_WORD
-        #textview.show_caret = true
-      $log.debug "  before adding tab to TP "
-      @tab1 = @tp.add_tab "&TextView", @scroll
-      @scroll.child(textview)
-
-
-      @tab2 = @tp.add_tab "&Settings"
-
-      #f2 = @tab2.form
-      #$log.debug " textarea tp form #{f2} "
-      r = 4
-        texta = TextArea.new do
-          name   "myText" 
-          #row r
-          #col 1 
-          #width w-5
-          #height h-5
-          title "EditMe.txt"
-          title_attrib 'bold'
-          print_footer true
-          footer_attrib 'bold'
-        end
-        @tab2.component = texta
-        texta << "I expect to pass through this world but once." << "Any good therefore that I can do, or any kindness or abilities that I can show to any fellow creature, let me do it now."
-        texta << "Let me not defer it or neglect it, for I shall not pass this way again."
-        texta << " "
-        texta << "q to exit."
-        texta << "Some more text going below scrollpane.. "
-        texta << "Love all creatures for they are none but yourself."
-        #texta.show_caret = true # since the cursor is not showing correctly, show internal one.
-
-        # This uses the old style, we get a padded form and then add objects to it.
-      @tab3 = @tp.add_tab "&Editors"
-      #f3 = @tab3.form
-      f3 = @tp.form @tab3 # this replaces previous line, since we don't create form by default
-      butts = %w[ &Vim E&macs &Jed E&lvis ]
-      bcodes = %w[ VIM EMACS JED ELVIS]
-      row = 4
-      butts.each_with_index do |name, i|
-        RubyCurses::CheckBox.new f3 do
-          text name
-          variable $config_hash
-          name bcodes[i]
-          row row+i
-          col 5
-        end
-      end
-      @help = "F1 to quit. M- T/S/E for tabs. M-n p h l scrollpane  #{$0} Check logger too"
-            RubyCurses::Label.new @form, {'text' => @help, "row" => r+h+2, "col" => 2, "color" => "yellow"}
-      @form.repaint
-      @window.wrefresh
-      Ncurses::Panel.update_panels
-      while((ch = @window.getchar()) != KEY_F1 )
-       # @tp.repaint
-        @form.handle_key(ch)
-        @window.wrefresh
-      end
-      #@tp.show
-      #@tp.handle_keys
-  end
-end
-if $0 == __FILE__
-  # Initialize curses
-  begin
-    # XXX update with new color and kb
-    VER::start_ncurses  # this is initializing colors via ColorMap.setup
-    $log = Logger.new((File.join(ENV["LOGDIR"] || "./" ,"rbc13.log")))
-    $log.level = Logger::DEBUG
-    n = TestTabbedPane.new
-    n.run
-  rescue => ex
-  ensure
-    VER::stop_ncurses
-    p ex if ex
-    p(ex.backtrace.join("\n")) if ex
-    $log.debug( ex) if ex
-    $log.debug(ex.backtrace.join("\n")) if ex
-  end
-end

data/examples/deprecated/testtpanetable.rb

@@ -1,203 +0,0 @@
-#*******************************************************#
-#                   testtpanetable.rb                   #
-#                 written by Rahul Kumar                #
-#                    January 29, 2010                   #
-#                                                       #
-#     testing tabbedpane with table                     #
-#                                                       #
-#            Released under ruby license. See           #
-#         http://www.ruby-lang.org/en/LICENSE.txt       #
-#               Copyright 2010, Rahul Kumar             #
-#*******************************************************#
-
-# this is a test program, tests out tabbed panes. type F1 to exit
-# Avoid using ScrollPane at present, I intend rewriting it some day
-# It sucks. Even the TabbedPane code will be rewritten completely.
-# Don't use this demo.
-require 'rubygems'
-#require 'ncurses' # FFI
-require 'logger'
-require 'rbcurse'
-require 'rbcurse/rtabbedpane'
-require 'rbcurse/rtable'
-require 'rbcurse/rscrollpane'
-
-class TestTabbedPane
-  def initialize
-    acolor = $reversecolor
-  end
-  def run
-    $config_hash ||= Variable.new Hash.new
-    @window = VER::Window.root_window
-    @form = Form.new @window
-    $log.debug " MAIN FORM #{@form} "
-    r = 1; c = 1;
-    h = 20; w = 70
-      @tp = RubyCurses::TabbedPane.new @form  do
-        height h
-        width  w
-        row 2
-        col 8
-        #button_type :ok
-      end
-      @tab1 = @tp.add_tab "&Table" 
-      #f1 = @tab1.form
-      f1 = @tp.form @tab1
-      raise "form f1 nil" unless f1
-      $log.debug " TABLE FORM #{f1} "
-
-      data = [["Pathetique",3,"Tchaikovsky",3.21, true, "WIP"],
-        ["Ali Maula Ali Maula",3,"NFAK",3.47, true, "WIP"],
-        ["Tera Hijr Mera Nasib",92,"Razia Sultan",412, true, "Fin"],
-        ["Piano Concerto 4&5",4,"Beethoven",110.0, false, "Cancel"],
-        ["Toccata and Fugue",4,"J S Bach",102.72, false, "Postp"],
-        ["Symphony No. 3",4,"Henryk Gorecki",102.72, true, "Postp"],
-        ["The Great Gig in the Sky",8,"Pink Floyd",12.72, false, "Todo"],
-        ["Steppes of Central Asia",9,"Borodin",12.2, false, "WIP"],
-        ["Wish You Were Here",8,"Pink Floyd",2.7, false, "Todo"],
-        ["Habanera",nil,"Maria Callas",112.7, true, "Cancel"],
-        ["Mack the Knife",9,"Loius Armstrong",12.2, false, "Todo"],
-        ["Prince Igor",9,"Borodin",16.3, false, "WIP"],
-        ["Shahbaaz Qalandar",9,"Nusrat Fateh Ali Khan",12.2, false, "Todo"],
-        ["Raag Darbari",9,"Ustad Fateh Ali Khan",12.2, false, "Todo"],
-        ["Yaad-e-Mustafa Aisi",9,"Santoo Khan",12.2, true, "Todo"],
-        ["Chaconne",4,"Johann S Bach",12.42, true, "Postp"],
-        ["Raag Jaunpuri",9,"Ustad Fateh Ali Khan",12.2, false, "Todo"],
-        ["Dalaleragita",9,"Vaishnava",12.2, false, "Todo"],
-        ["Prasada sevaya",9,"Vaishnava",12.2, false, "Todo"],
-        ["Sri Rupamanjiri",9,"Vaishnava",12.2, false, "Todo"],
-        ["M Vlast ",9,"Smetana",12.2, false, "Todo"],
-        ["Jai Radha Madhava",163,"Jagjit Singh",5.4, false, "WIP"]]
-
-      colnames = %w[ Song Cat Artist Ratio Flag Status]
-      statuses = ["Todo", "WIP", "Fin", "Cancel", "Postp"]
-
-        atable = Table.new f1 do
-          name   "mytable" 
-          row  4 
-          col  0
-          width 78
-          height 15
-          #title "A Table"
-          #title_attrib (Ncurses::A_REVERSE | Ncurses::A_BOLD)
-          cell_editing_allowed true
-          editing_policy :EDITING_AUTO
-          set_data data, colnames
-        end
-        sel_col = Variable.new 0
-        sel_col.value = 0
-        tcm = atable.get_table_column_model
-        selcolname = atable.get_column_name sel_col.value
-        #
-        ## key bindings fo atable
-        # column widths 
-          tcm.column(0).width 24
-          tcm.column(1).width 5
-          tcm.column(2).width 18
-          #tcm.column(2).editable false
-          tcm.column(3).width 7
-          tcm.column(4).width 5
-          tcm.column(5).width 8
-        atable.configure() do
-          bind_key(330) { atable.remove_column(tcm.column(atable.focussed_col)) rescue ""  }
-          bind_key(?+) {
-            acolumn = atable.get_column selcolname
-            w = acolumn.width + 1
-            acolumn.width w
-            #atable.table_structure_changed
-          }
-          bind_key(?-) {
-            acolumn = atable.get_column selcolname
-            w = acolumn.width - 1
-            if w > 3
-            acolumn.width w
-            #atable.table_structure_changed
-            end
-          }
-          bind_key(?>) {
-            colcount = tcm.column_count-1
-            #atable.move_column sel_col.value, sel_col.value+1 unless sel_col.value == colcount
-            col = atable.focussed_col
-            atable.move_column col, col+1 unless col == colcount
-          }
-          bind_key(?<) {
-            col = atable.focussed_col
-            atable.move_column col, col-1 unless col == 0
-            #atable.move_column sel_col.value, sel_col.value-1 unless sel_col.value == 0
-          }
-          #bind_key(KEY_RIGHT) { sel_col.value = sel_col.value+1; current_column sel_col.value}
-          #bind_key(KEY_LEFT) { sel_col.value = sel_col.value-1;current_column sel_col.value}
-        end
-
-      @tab2 = @tp.add_tab "&ScrollTable" 
-      #f2 = @tab2.form
-      f2 = @tp.form @tab2
-        scroll = ScrollPane.new f2 do
-          name   "myScroller" 
-          row 4
-          col  0 
-          width w-2
-          height h-2
-        end
-
-      $log.debug " TABLE FORM 2  #{f2} "
-        btable = Table.new nil do
-          name   "mytab2" 
-          row  0 
-          col  0
-          width 78
-          height 15
-          #title "A Table"
-          #title_attrib (Ncurses::A_REVERSE | Ncurses::A_BOLD)
-          cell_editing_allowed true
-          editing_policy :EDITING_AUTO
-          set_data data, colnames
-        end
-        sel_col = Variable.new 0
-        sel_col.value = 0
-        tcm = btable.get_table_column_model
-        selcolname = btable.get_column_name sel_col.value
-        #
-        ## key bindings fo atable
-        # column widths 
-          tcm.column(0).width 24
-          tcm.column(1).width 5
-          tcm.column(2).width 18
-          #tcm.column(2).editable false
-          tcm.column(3).width 7
-          tcm.column(4).width 5
-          tcm.column(5).width 8
-        scroll.child(btable)
- 
-      @help = "F1 to quit. Use any key of key combination to see what's caught. #{$0} Check logger too"
-            RubyCurses::Label.new @form, {'text' => @help, "row" => r+h+2, "col" => 2, "color" => "yellow"}
-      @form.repaint
-      @window.wrefresh
-      Ncurses::Panel.update_panels
-      while((ch = @window.getchar()) != KEY_F1 )
-       # @tp.repaint
-        @form.handle_key(ch)
-        @window.wrefresh
-      end
-      #@tp.show
-      #@tp.handle_keys
-  end
-end
-if $0 == __FILE__
-  # Initialize curses
-  begin
-    # XXX update with new color and kb
-    VER::start_ncurses  # this is initializing colors via ColorMap.setup
-    $log = Logger.new((File.join(ENV["LOGDIR"] || "./" ,"rbc13.log")))
-    $log.level = Logger::DEBUG
-    n = TestTabbedPane.new
-    n.run
-  rescue => ex
-  ensure
-    VER::stop_ncurses
-    p ex if ex
-    p(ex.backtrace.join("\n")) if ex
-    $log.debug( ex) if ex
-    $log.debug(ex.backtrace.join("\n")) if ex
-  end
-end

data/examples/dirtree.rb

@@ -1,88 +0,0 @@
-require 'rbcurse/app'
-require 'fileutils'
-require 'rbcurse/tree/treemodel'
-#require 'rbcurse/common/file'
-require './common/file'
-
-def _directories wd
-  $log.debug " directories got XXX: #{wd} "
-  d = Dir.new(wd)
-  ent = d.entries.reject{|e| !File.directory? File.join(wd,e)}
-  $log.debug " directories got XXX: #{ent} "
-  ent.delete(".");ent.delete("..")
-  return ent
-end
-App.new do 
-  header = app_header "rbcurse #{Rbcurse::VERSION}", :text_center => "Yet Another File Manager", :text_right =>"Directory Lister", :color => :black, :bgcolor => :white#, :attr =>  Ncurses::A_BLINK
-  message "Press Enter to expand/collapse"
-
-  pwd = Dir.getwd
-  #d = Dir.new(pwd)
-  #entries = d.entries.reject{|e| !File.directory? e}
-  #entries.delete(".");entries.delete("..")
-  entries = _directories pwd
-  patharray = pwd.split("/")
-  # we have an array of path, to add recursively, one below the other`
-  nodes = []
-  nodes <<  TreeNode.new(patharray.shift)
-  patharray.each do |e| 
-    nodes <<  nodes.last.add(e)
-  end
-  last = nodes.last
-  nodes.last.add entries
-  model = DefaultTreeModel.new nodes.first
-     
-
-
-  ht = FFI::NCurses.LINES - 2
-  borderattrib = :reverse
-  stack :margin_top => 1, :margin => 0, :width => 30 do
-    @t = tree :data => model, :height => ht, :border_attrib => borderattrib
-    @t.bind :TREE_WILL_EXPAND_EVENT do |node|
-      path = File.join(*node.user_object_path)
-      dirs = _directories path
-      ch = node.children
-      ch.each do |e| 
-        o = e.user_object
-        if dirs.include? o
-          dirs.delete o
-        else
-          # delete this child since its no longer present TODO
-        end
-      end
-      message " #{node} will expand: #{path}, #{dirs} "
-      node.add dirs
-    end
-    @t.bind :TREE_SELECTION_EVENT do |ev|
-      if ev.state == :SELECTED
-        node = ev.node
-        path = File.join(*node.user_object_path)
-        if File.exists? path
-          files = Dir.new(path).entries
-          files.delete(".")
-          @l.list files 
-          #TODO show all details in filelist
-          @current_path = path
-          $log.debug " XXX selected afterseeting lb: #{@l} "
-        end
-      end
-    end # select
-    @t.expand_node last # 
-    @t.mark_parents_expanded last # make parents visible
-  end
-  stack :margin_top => 1, :margin => 30, :width => 50 do
-    @l = list_box :height => ht, :border_attrib => borderattrib
-    @l.bind :LIST_SELECTION_EVENT  do |ev|
-      $log.debug " XXX GOT A LIST EVENT #{ev} "
-      message ev.source.selected_value
-      file_page   ev.source.selected_value if ev.type == :INSERT
-      #TODO when selects drill down
-      #TODO when selecting, sync tree with this
-    end
-    # on pressing enter, we edit the file using vi or EDITOR
-    @l.bind :PRESS  do |ev|
-      file_edit ev.text if File.exists? ev.text
-    end
-  end
-  status_line :row => FFI::NCurses.LINES - 1
-end # app

data/examples/experimental/resultsetdemo.rb

@@ -1,280 +0,0 @@
-require 'rbcurse/extras/resultsettextview.rb'
-require 'fileutils'
-
-=begin
-# See tabbed pane, and add_cols nad add_rows, on_entr and set_form_row to see cursor issue
-# remove main form 
-# don't make a widget just an object
-# let it create own form.
-
-# NOTE: experimental, not yet firmed up
-# If you use in application, please copy to some application folder in case i change this.
-# Can be used for print_help_page
-# SUGGESTIONS WELCOME.
-# @since 1.4.1
-module RubyCurses
-
-  class ResultsetBrowser #< Widget
-    #include EventHandler
-    include ConfigSetup
-    include RubyCurses::Utils
-    #dsl_property :xxx
-    # I don't think width is actually used, windows width matters. What of height ?
-    # THATS WRONG , i cannot eat up window. I should use object dimentsion for pad,
-    #  not window dimensions
-    dsl_accessor :row, :col, :height, :width
-    dsl_accessor :should_print_border
-
-    def initialize win, config={}, &block
-      @should_print_border = true
-      @v_window = win #form.window
-      @window = @v_window
-      @focusable = true
-      @editable  = true
-      @old_index = @current_index = 0
-      @fields = nil
-      config_setup config 
-      instance_eval &block if block_given?
-      init_vars
-    end
-    def map_keys
-      @v_form.bind_key(?\C-n) { @current_index += 1 if @current_index < @rows.count-1 }
-      @v_form.bind_key(?\C-p) {  @current_index -= 1  if @current_index > 0 }
-      @mapped = true
-    end
-    def init_vars
-      @row ||= 0
-      @col ||= 0
-      @height ||= 15
-      @width ||= 50
-      @field_offset = 14   # where actual Field should start (leaving space for label)
-      @row_offset ||= 0
-      @col_offset ||= 1
-      @border_offset = 0
-      if @should_print_border
-        @border_offset = 1
-      end
-      @v_form = RubyCurses::ScrollForm.new @v_window
-      @v_form.display_h(@height-1-@border_offset*2) if @height
-      @v_form.display_w(@width-1-@border_offset*2)  if @width
-    end
-    def data=(rows)
-      @rows = rows
-    end
-    def columns=(columns)
-      @columns = columns
-      h = @columns.count + 2
-      w = 150 
-      #row = 1
-      #col = 1
-      row = @row + @border_offset
-      col = @col + @border_offset
-      @v_form.set_pad_dimensions(row, col, h, w)
-      @v_form.should_print_border(false) # this should use dimensions of object not window. # 2011-10-12 15:48:14
-      # currently I don't have space for any buttons or anything.  The form takes all space of the window
-      # not of the object defined.
-      # I should be able to tell Scrollform to use only thismuch of window.
-    end
-    def set_form_row
-      f = @v_form.get_current_field
-      f.set_form_row
-    end
-    def handle_key ch
-      map_keys unless @mapped
-      $log.debug "XXX: RB HK got ch "
-      ret =  @v_form.handle_key ch
-      #set_form_row
-      if ret == :UNHANDLED
-        @v_form.process_key ch, self
-      end
-      repaint
-      @v_window.wrefresh
-    end
-    def repaint
-      @fields ||= _create_fields
-      #alert "old #{@old_index} , #{@current_index} "
-      if @old_index != @current_index
-        #alert "index change"
-        row = @rows[@current_index]
-        @columns.each_with_index { |e, i|  
-          value = row[i]
-          len = value.to_s.length
-          type=@rows[0].types[i]
-          if type == "TEXT"
-            value = value.gsub(/\n/," ") if value
-          end
-          f = @fields[i]
-          @fields[i].set_buffer(value)
-          if f.display_length < len && len < (@width - @field_offset)
-            @fields[i].display_length len
-          end
-        }
-        @v_form.repaint
-        @window.wrefresh
-        Ncurses::Panel.update_panels
-        @old_index = @current_index
-      end
-    end
-    # maybe not required since we don't have 2 forms now
-    def unused_on_enter
-      if $current_key == KEY_BTAB
-        c = @v_form.widgets.count-1
-        @v_form.select_field c
-      else
-        @v_form.select_field 0
-      end
-    end
-    private
-    def _create_fields
-      color = $datacolor
-      if @should_print_border
-        @v_window.print_border @row, @col, @height-1, @width, color #, Ncurses::A_REVERSE
-        @row_offset += 1
-        @col_offset += 1
-      end
-      $log.debug "XXX: ROWS#{@rows}"
-      $log.debug "XXX: COLS#{@columns}"
-      $log.debug "XXX: row#{@rows[@current_index]}"
-      fields = []
-      r = @row + @row_offset   # row was for where to print the total object, not this
-      c = @col + @col_offset + @field_offset # 14 is to leave space for labels
-      v_form = @v_form
-      @columns.each_with_index { |e, index| 
-        #break if index >= @height-1 # create only as much space we have, SUCKS but just trying till be scroll
-        #$log.debug "XXX: #{r} #{c} EACH #{e}, #{index}, #{@rows[@current_index][index]}"
-        value=@rows[@current_index][index]
-        type=@rows[0].types[index]
-        if type == "TEXT"
-          value = value.gsub(/\n/," ") if value
-        end
-        len = [value.to_s.length, (@width - @field_offset)].min
-        f = Field.new v_form do 
-          name  e
-          row  r
-          col c 
-          bgcolor 'blue'
-          highlight_background 'cyan'
-          set_buffer value
-          display_length len
-          set_label Label.new v_form, {'text' => e, 'color'=>'cyan'}
-        end
-        fields << f
-        r += 1
-      }
-      @v_form.repaint
-      @window.wrefresh
-      Ncurses::Panel.update_panels
-      #$log.debug "XXX: created fields "
-      return fields
-    end
-    
-    # ADD HERE
-    
-  end # class
-end # module
-module RubyCurses
-  # a data viewer for viewing some text or filecontents
-  # view filename, :close_key => KEY_RETURN
-  # send data in an array
-  # view Array, :close_key => KEY_RETURN, :layout => [0,0,23,80]
-  # when passing layout reserve 4 rows for window and border. So for 2 lines of text
-  # give 6 rows.
-  class Browser
-    def self.browse_sql dbname, tablename, sql, config={} #:yield: ???
-      raise "file not found" unless File.exist? dbname
-      require 'sqlite3'
-      db = SQLite3::Database.new(dbname)
-      columns, *rows = db.execute2(sql)
-      #$log.debug "XXX COLUMNS #{sql}  "
-      content = rows
-      return nil if content.nil? or content[0].nil?
-      datatypes = content[0].types 
-      self.browse db, tablename, columns, rows, config
-    end
-    # @param filename as string or content as array
-    # @yield textview object for further configuration before display
-    # NOTE: i am experimentally yielding textview object so i could supress borders
-    # just for kicks, but on can also bind_keys or events if one wanted.
-    #def self.view what, config={} #:yield: textview
-    def self.browse dbconn, tablename, columns, rows, config={} #:yield: ???
-      wt = 0 # top margin
-      wl = 0 # left margin
-      wh = Ncurses.LINES-wt-3 # height, goes to bottom of screen
-      ww = Ncurses.COLS-wl-3  # width, goes to right end
-      wt, wl, wh, ww = config[:layout] if config.has_key? :layout
-
-      fp = config[:title] || ""
-      pf = config.fetch(:print_footer, true)
-      ta = config.fetch(:title_attrib, 'bold')
-      fa = config.fetch(:footer_attrib, 'bold')
-
-      wh = Ncurses.LINES-0
-      ww = Ncurses.COLS-0
-      layout = { :height => wh, :width => ww, :top => wt, :left => wl } 
-      #v_window = config[:window] # using previous window cause crash seg fault
-      #v_window ||= VER::Window.new(layout) # copywin gives -1 and prints nothing
-      v_window = VER::Window.root_window
-      v_window.printstring 0, 30, "Database Browser Demo", $datacolor
-      @form = RubyCurses::Form.new v_window # only for some widgets that are not editable
-      header = app_header "rbcurse ", :text_center => "ResultsetBrowser Demo", :text_right =>"New Improved!", :color => :black, :bgcolor => :white, :attr => :bold 
-      sl = status_line :row => v_window.height == 0 ? Ncurses.LINES-1 : v.window.height-1
-      sl.command { "Record Navigation: C-n C-p. Scrolling M-n, M-p, M-l, M-h" }
-      
-      @form.repaint
-
-      #rb = ResultsetBrowser.new v_form, :row => 2, :col => 2
-      rb = ResultsetBrowser.new v_window, :row => 2, :col => 2, :height => 20, :width => 95
-      rb.columns = columns
-      rb.data = rows
-      rb.repaint
-
-
-      # yielding textview so you may further configure or bind keys or events
-      begin
-      #v_form.repaint
-      v_window.wrefresh
-      Ncurses::Panel.update_panels
-      # allow closing using q and Ctrl-q in addition to any key specified
-      #  user should not need to specify key, since that becomes inconsistent across usages
-        while((ch = v_window.getchar()) != ?\C-q.getbyte(0) )
-          break if ch == config[:close_key] 
-          rb.handle_key ch
-          #v_form.handle_key ch
-        end
-      rescue => err
-        $log.error err.to_s
-        $log.error err.backtrace.join("\n")
-        alert err.to_s
-
-      ensure
-        v_window.destroy if !v_window.nil?
-      end
-    end
-  end  # class
-end # module
-=end
-if __FILE__ == $PROGRAM_NAME
-require 'rbcurse/app'
-
-App.new do 
-  header = app_header "rbcurse ", :text_center => "ResultsetBrowser Demo", :text_right =>"New Improved!", :color => :black, :bgcolor => :white, :attr => :bold 
-  message "Press F10 to exit from here"
-  columns = ["Name","Age","City", "Country"]
-  data    = [
-             [ "Rahul",31, "Delhi","India"], 
-             [ "Dev",35, "Mumbai","India"], 
-             [ "Jobs",56, "L.A","U.S.A"], 
-             [ "Matz",40, "Tokyo","Nippon"] 
-  ]
-
-    #RubyCurses::Browser.browse("dummy", "atable", columns, data,  :close_key => FFI::NCurses::KEY_F10, :title => "Enter to close") do |t|
-  sql = "select id, type, priority, title from bugs"
-  sql = "select * from bugs"
-  file = "bugzy.sqlite"
-  tv = RubyCurses::ResultsetTextView.new @form, :row => 1,  :col => 1, :width => 50, :height => 16
-  tv.sqlite file, "bugs", sql
-    #RubyCurses::Browser.browse_sql("bugzy.sqlite", "bugs", sql, :close_key => FFI::NCurses::KEY_F10, :title => "Enter to close", :window => @window) do |t|
-    #end
-
-end # app
-end