class KeyTest

Attributes

ttest[R]

Public Class Methods

new(_parent=nil) click to toggle source
Calls superclass method TkFloatTitledFrame::new
# File lib/a-tkcommons.rb, line 3159
def initialize(_parent=nil)
  _parent = Arcadia.instance.layout.root if _parent.nil?
  super(_parent)

  @ttest = TkText.new(self.frame){
    background  Arcadia.conf("background")
    foreground  Arcadia.conf("foreground")
    #place('relwidth' => '1','relx' => 0,'x' => '0','y' => '0','relheight' => '1','rely' => 0,'height' => '0','bordermode' => 'inside','width' => '0')
  }.bind("KeyPress", "%K"){|_keysym|
    @ttest.insert('end'," "+_keysym+" ")
    break
  }
  @ttest.extend(TkScrollableWidget).show
  place('x'=>100,'y'=>100,'height'=> 220,'width'=> 500)
end