Method: VRVertTwoPaneFrame#splitterDragging

Defined in:

lib/vr/vrlayout2.rb

#splitterDragging(x, y) ⇒ Object

# File 'lib/vr/vrlayout2.rb', line 272

def splitterDragging(x,y)
  return if y<@separatorheight+@_vr_ly or y>@_vr_ly+@_vr_lh-@separatorheight
  @ratio=(y-@_vr_ly).to_f/@_vr_lh

  case(splitter_operation_type)
  when SPLITTER_MOVEWINDOW
      _vr_relayout(y-@_vr_ly)
  when SPLITTER_DRAWLINE
    w = window_parent
    w.dopaint do |hdc|
      w.setBrush(RGB(0x255,0x255,0x255))
      if @_vr_splitter_last then
        VRTwoPaneFrame::PatBlt.call(hdc,*@_vr_splitter_last) 
      end
      current=[@_vr_lx,y,@_vr_lw,@separatorheight,0x5a0049] # PATINVERT
      VRTwoPaneFrame::PatBlt.call(hdc,*current)
      @_vr_splitter_last = current
    end
  end
end