Class: AGTkBwNoteBook

Inherits:
AGTkBwPanedWindow show all
Defined in:
ext/ae-rad/lib/tkext/al-bwidget.rb

Class Method Summary collapse

Instance Method Summary collapse

Class Method Details

.class_wrapped ⇒ Object 



160
161
162
 
# File 'ext/ae-rad/lib/tkext/al-bwidget.rb', line 160

def AGTkBwNoteBook.class_wrapped
  Tk::BWidget::NoteBook
end

Instance Method Details

#new_object ⇒ Object 



156
157
158
 
# File 'ext/ae-rad/lib/tkext/al-bwidget.rb', line 156

def new_object
  @obj = Tk::BWidget::NoteBook.new(@ag_parent.obj)
end

#properties ⇒ Object 



165
166
167
168
169
170
171
172
173
 
# File 'ext/ae-rad/lib/tkext/al-bwidget.rb', line 165

def properties
  super
  publish('property','name'=>'background',
  'get'=> proc{@obj.cget('background')},
  'set'=> proc{|background| @obj.configure('background'=>background)},
  'def'=> '',
  'type'=> TkType::TkagColor
  )
end