Module: VRTwoPaneFrame::VRTwoPaneFrameUsable
- Defined in:
- lib/vr/vrlayout2.rb
Instance Attribute Summary collapse
-
#_vr_twopaneframes ⇒ Object
readonly
Returns the value of attribute _vr_twopaneframes.
Instance Method Summary collapse
- #_vr_twopaneframesinit ⇒ Object
- #self_vrsepl2buttondown(s, x, y) ⇒ Object
- #self_vrsepl2buttonup(s, x, y) ⇒ Object
- #self_vrsepl2mousemove(s, x, y) ⇒ Object
Instance Attribute Details
#_vr_twopaneframes ⇒ Object (readonly)
Returns the value of attribute _vr_twopaneframes.
155 156 157 |
# File 'lib/vr/vrlayout2.rb', line 155 def _vr_twopaneframes @_vr_twopaneframes end |
Instance Method Details
#_vr_twopaneframesinit ⇒ Object
157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 |
# File 'lib/vr/vrlayout2.rb', line 157 def _vr_twopaneframesinit return if defined?(@_vr_twopaneframes) # no init twice @_vr_twopaneframes = Array.new @_vr_current_tpframe=nil addHandler( WMsg::WM_LBUTTONUP, "vrsepl2buttonup", MSGTYPE::ARGINTSINTSINT,nil) addHandler( WMsg::WM_LBUTTONDOWN,"vrsepl2buttondown",MSGTYPE::ARGINTSINTSINT,nil) addHandler( WMsg::WM_MOUSEMOVE, "vrsepl2mousemove", MSGTYPE::ARGINTSINTSINT,nil) acceptEvents [ WMsg::WM_LBUTTONUP,WMsg::WM_LBUTTONDOWN,WMsg::WM_MOUSEMOVE ] end |
#self_vrsepl2buttondown(s, x, y) ⇒ Object
173 174 175 176 177 178 179 180 181 |
# File 'lib/vr/vrlayout2.rb', line 173 def (s,x,y) @_vr_twopaneframes.each do |f| if f.hittest(x,y) f.setDragCur f.dragstart @_vr_current_tpframe=f end end end |
#self_vrsepl2buttonup(s, x, y) ⇒ Object
183 184 185 186 187 188 |
# File 'lib/vr/vrlayout2.rb', line 183 def (s,x,y) @_vr_current_tpframe=nil @_vr_twopaneframes.each do |f| f.dragend end end |
#self_vrsepl2mousemove(s, x, y) ⇒ Object
190 191 192 193 194 195 196 197 198 199 |
# File 'lib/vr/vrlayout2.rb', line 190 def self_vrsepl2mousemove(s,x,y) @_vr_twopaneframes.each do |f| if f.hittest(x,y) f.setDragCur end end if @_vr_current_tpframe then @_vr_current_tpframe.splitterDragging(x,y) end end |