Method: VRParent#createControl

Defined in:
lib/vr/vruby.rb

#createControl(type, name, caption, x = 0, y = 0, w = 10, h = 10, style = 0) ⇒ Object



520
521
522
523
524
525
526
527
528
529
530
# File 'lib/vr/vruby.rb', line 520

def createControl(type,name,caption, x=0,y=0,w=10,h=10, style=0)
  c=@screen.factory.newwindow(self,type)
#    c.extend type
  info = type.Controltype
  c.classname= info[0] if info[0]
  c.caption= caption
  c.style=WStyle::WS_VISIBLECHILD | info[1] | style
  c.exstyle = info[2] if info.size>2
  c.move x,y,w,h
  c
end