Class: VRRebar

Inherits:

VRNotifyControl

• Object
• SWin::Window
• VRWinComponent
• VRControl
• VRNotifyControl
• VRRebar

Includes:

VRParent

Defined in:

lib/vr/vrcomctl.rb

Constant Summary

WINCLASSINFO =

VRRebar

Rebar control.
If comctl32.dll on your system is too old, this is not available.

Methods

— insertband(cntl,txt,minx=30,miny=cnt.h+2,band=-1)

Creates a new band and set the control on it.
((|txt|)) is the caption of the band and minx/miny is the minimum size of
the band.
The control is created by rebar's addControl() but its event handling is on
the parent window.

— bkColor=© — bkColor

Sets/Gets background color of rebar.

— textColor=© — textColor

Sets/Gets band caption color.

— relayout(x=self.x, y=self.y, w=self.w, h=self.h)

rearranges rebar's bands in the specified rectangle.

["ReBarWindow32",0]

Constants included from VRParent

VRParent::DEFAULT_FONT, VRParent::VR_ADDCONTROL_FEWARGS

Instance Attribute Summary

Attributes included from VRParent

#screen

Attributes inherited from VRNotifyControl

#_vr_notifyarg

Attributes inherited from VRControl

#handlers, #name, #parent

Attributes inherited from VRWinComponent

#parent, #screen

Instance Method Summary

• #bkColor ⇒ Object
• #bkColor=(c) ⇒ Object
• #h ⇒ Object
• #insertband(cnt, txt, minx = 30, miny = cnt.h+2, band = -1)) ⇒ Object
• #newControlID ⇒ Object
• #rebarinit ⇒ Object
• #registerControl(*arg) ⇒ Object
• #relayout(x = self.x, y = self.y, w = self.w, h = self.h) ⇒ Object
• #textColor ⇒ Object
• #textColor=(c) ⇒ Object
• #vrinit ⇒ Object

Methods included from VRParent

#addArrayedControl, #addControl, #clearControls, #construct, #countControls, #create, #createControl, #deleteControl, #parentinit, #registerControlAsArrayed, #self_created, #send_parent

Methods inherited from VRNotifyControl

#_vr_ntfyhandlers, #addFilterArg, #addNotifyHandler, #deleteFilterArg, #deleteNotifyHandler, #notifycontrolinit

Methods inherited from VRControl

Controltype, #add_parentcall, #call_parenthandler, #create, #setFont

Methods inherited from VRWinComponent

#_init, #create, #exwinstyle, #hide, #maximizebox, #maximizebox=, #minimizebox, #minimizebox=, #setscreen, #sizebox, #sizebox=, #tabstop, #tabstop=, #winstyle

Instance Method Details

#bkColor ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1743

def bkColor
  sendMessage WMsg::RB_GETBKCOLOR,0,0
end

#bkColor=(c) ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1746

def bkColor=(c)
  sendMessage WMsg::RB_SETBKCOLOR,0,c
end

#h ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1739

def h
  sendMessage WMsg::RB_GETBARHEIGHT,0,0
end

#insertband(cnt, txt, minx = 30, miny = cnt.h+2, band = -1)) ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1720

def insertband(cnt,txt,minx=30,miny=cnt.h+2,band=-1)
  size = 4*14
  mask= WConst::RBBIM_TEXT | WConst::RBBIM_STYLE | WConst::RBBIM_CHILD | WConst::RBBIM_CHILDSIZE | WConst::RBBIM_SIZE
  style= 4 #RBBS_CHILDEDGE
  frcolor= 0
  bkcolor= 0
  text= txt
  cch= 0
  image= 0
  hwndChild= cnt.hWnd
  cxmin= minx
  cymin= miny
  cx= 100
  bkBmp= 0
  wid= 0
  tis = [size,mask,style,frcolor,bkcolor,text,cch,image,hwndChild,cxmin,cymin,cx,bkBmp,wid].pack("LLLLLP#{text.length}LLLLLLLL")
  sendMessage WMsg::RB_INSERTBAND,band,tis
end

#newControlID ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1762

def newControlID
  @parent.newControlID
end

#rebarinit ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1710

def rebarinit
  sendMessage WMsg::RB_SETBARINFO,0,[12,0,0].pack("LLL")
  addNotifyHandler WMsg::RBN_LAYOUTCHANGED,"layoutchanged",MSGTYPE::ARGNONE,nil
end

#registerControl(*arg) ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1765

def registerControl(*arg)
  @parent.registerControl(*arg)
end

#relayout(x = self.x, y = self.y, w = self.w, h = self.h) ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1757

def relayout(x=self.x,y=self.y,w=self.w,h=self.h)
  sendMessage WMsg::RB_SIZETORECT,0,[x,y,w,h].pack("LLLL")
end

#textColor ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1750

def textColor
  sendMessage WMsg::RB_GETTEXTCOLOR,0,0
end

#textColor=(c) ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1753

def textColor=(c)
  sendMessage WMsg::RB_SETTEXTCOLOR,0,c
end

#vrinit ⇒ Object

# File 'lib/vr/vrcomctl.rb', line 1715

def vrinit
  super
  rebarinit
end