【photonpun 源码】【vc键盘键码源码】【趋势划线线源码】鼠标拖动源码_鼠标拖动源码怎么设置

时间:2024-12-28 10:30:00 来源:股票psy指标源码 分类:休闲

1.在VB或C++中,鼠标鼠标设置如何记录鼠标的拖动拖动移动轨迹?
2.SortableJS原理分析(源码)
3.java中的一段,谁能读懂?Component干什么用的源码源码

鼠标拖动源码_鼠标拖动源码怎么设置

在VB或C++中,如何记录鼠标的鼠标鼠标设置移动轨迹?

       VB绘制鼠标移动轨迹

       主要代码及注释如下:

       Public Class Form1Class Form1

        Dim PtStart As Point '记录绘制直线的起始点

        Dim PtEnd As Point '记录绘制直线的终点

        Dim ShouldDrawLine As Boolean '是否绘制直线

        '记录鼠标左键点击的位置,第二次点击后开始绘制直线

        Private Sub Pic1_MouseDown()Sub Pic1_MouseDown(ByVal sender As Object,拖动拖动 ByVal e As System.Windows.Forms.MouseEventArgs) Handles Pic1.MouseDown

        If e.Button = Windows.Forms.MouseButtons.Left Then

        If Not ShouldDrawLine Then

        PtStart = New Point(e.X, e.Y)

        ShouldDrawLine = True

        Else

        PtEnd = New Point(e.X, e.Y)

        '下面两句根据需要进行取舍

        'Call DrawLine(PtStart, PtEnd) '绘制一条直线

        Call DrawLines(PtStart, PtEnd) '绘制多条直线

        ShouldDrawLine = False

        End If

        End If

        End Sub

        '绘制鼠标的移动轨迹(仅在鼠标第一次点击后开始绘制轨迹)

        Private Sub Pic1_MouseMove()Sub Pic1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Pic1.MouseMove

        Static pt As Point

        If ShouldDrawLine Then

        '鼠标第一次点击的位置(需转化为屏幕坐标)

        Dim p As Point = Pic1.PointToScreen(PtStart)

        '清除原先绘制的鼠标移动轨迹

        If pt <> Nothing Then ControlPaint.DrawReversibleLine(p, pt, Color.Red)

        '绘制鼠标移动后新的轨迹

        pt = Pic1.PointToScreen(New Point(e.X, e.Y))

        ControlPaint.DrawReversibleLine(p, pt, Color.Red)

        Else

        pt = Nothing '清除鼠标原位置

        End If

        End Sub

        '绘制鼠标两次点击位置之间的直线

        Private Sub DrawLine()Sub DrawLine(ByVal mPoint1 As Point, ByVal mPoint2 As Point)

        Pic1.Refresh() '用于刷新Picturebox表面

        Pic1.CreateGraphics.DrawLine(Pens.Blue, mPoint1, mPoint2) '绘制两点间的直线

        End Sub

        '绘制多条直线,每两次鼠标点击确定一条线

        Private Sub DrawLines()Sub DrawLines(ByVal mPoint1 As Point,源码源码photonpun 源码 ByVal mPoint2 As Point)

        '此句不可删除,用于清除鼠标点击前的鼠标鼠标设置轨迹

        ControlPaint.DrawReversibleLine(Pic1.PointToScreen(mPoint1), Pic1.PointToScreen(mPoint2), Color.Red)

        Pic1.CreateGraphics.DrawLine(Pens.Blue, mPoint1, mPoint2) '绘制两点间的直线

        End Sub

        Private Sub Form1_Load()Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint, True)

        End Sub

       End Class

       注:此代码运行需要一个Form,Form上存在一个Pic1的拖动拖动Picturebox控件。

       举一反三,源码源码附另外一段代码:

       如何在窗体上随鼠标的鼠标鼠标设置移动快速绘制十字形轨迹源码

       Public Class Form2Class Form2

        Dim OldPoint As Point

        Private Sub Form2_Load()Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint, True)

        End Sub

        Private Sub Form1_MouseMove()Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove

        Dim p1, p2, p3, p4 As Point

        If OldPoint <> Nothing Then

        p1 = PointToScreen(New Point(OldPoint.X, 0))

        p2 = PointToScreen(New Point(OldPoint.X, Me.ClientSize.Height))

        p3 = PointToScreen(New Point(0, OldPoint.Y))

        p4 = PointToScreen(New Point(Me.ClientSize.Width, OldPoint.Y))

        ControlPaint.DrawReversibleLine(p1, p2, Color.Cyan)

        ControlPaint.DrawReversibleLine(p3, p4, Color.Cyan)

        End If

        p1 = PointToScreen(New Point(e.X, 0))

        p2 = PointToScreen(New Point(e.X, Me.ClientSize.Height))

        p3 = PointToScreen(New Point(0, e.Y))

        p4 = PointToScreen(New Point(Me.ClientSize.Width, e.Y))

        ControlPaint.DrawReversibleLine(p1, p2, Color.Cyan)

        ControlPaint.DrawReversibleLine(p3, p4, Color.Cyan)

        OldPoint = New Point(e.X, e.Y)

        End Sub

       End Class

        再附一段代码,在picturebox上实时绘制鼠标选中的拖动拖动矩形框

       Public Class Form2Class Form2

        Dim PtStart, pt As Point

        Dim RectSize As Size

        Private Sub Pic1_MouseDown()Sub Pic1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Pic1.MouseDown

        If e.Button = Windows.Forms.MouseButtons.Left Then PtStart = New Point(e.X, e.Y)

        End Sub

        Private Sub Pic1_MouseMove()Sub Pic1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Pic1.MouseMove

        If e.Button = Windows.Forms.MouseButtons.Left Then

        Dim p As Point = PointToScreen(PtStart) : p.Offset(Pic1.Location)

        If pt <> Nothing Then ControlPaint.DrawReversibleFrame(New Rectangle(p.X, p.Y, pt.X - p.X, pt.Y - p.Y), Color.Red, FrameStyle.Dashed)

        pt = PointToScreen(New Point(e.X, e.Y)) : pt.Offset(Pic1.Location)

        ControlPaint.DrawReversibleFrame(New Rectangle(p.X, p.Y, pt.X - p.X, pt.Y - p.Y), Color.Red, FrameStyle.Dashed)

        End If

        End Sub

        Private Sub DrawRect()Sub DrawRect(ByVal mPoint1 As Point, ByVal mPoint2 As Point)

        Pic1.Refresh()

        If mPoint2.X > mPoint1.X And mPoint2.Y > mPoint1.Y Then

        PtStart = New Point(mPoint1.X, mPoint1.Y) : RectSize = New Size(mPoint2.X - mPoint1.X, mPoint2.Y - mPoint1.Y)

        ElseIf mPoint2.X > mPoint1.X And mPoint2.Y < mPoint1.Y Then

        PtStart = New Point(mPoint1.X, mPoint2.Y) : RectSize = New Size(mPoint2.X - mPoint1.X, mPoint1.Y - mPoint2.Y)

        ElseIf mPoint2.X < mPoint1.X And mPoint2.Y > mPoint1.Y Then

        PtStart = New Point(mPoint2.X, mPoint1.Y) : RectSize = New Size(mPoint1.X - mPoint2.X, mPoint2.Y - mPoint1.Y)

        ElseIf mPoint2.X < mPoint1.X And mPoint2.Y < mPoint1.Y Then

        PtStart = New Point(mPoint2.X, mPoint2.Y) : RectSize = New Size(mPoint1.X - mPoint2.X, mPoint1.Y - mPoint2.Y)

        End If

        Pic1.CreateGraphics.DrawRectangle(Pens.Blue, New Rectangle(PtStart, RectSize))

        MsgBox(String.Format("左上角坐标{ 0}" + vbCrLf + "矩形大小{ 1}", PtStart.ToString, RectSize.ToString), MsgBoxStyle.Information, "Info")

        End Sub

        Private Sub Form1_Load()Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint, True)

        End Sub

        Private Sub Pic1_MouseUp()Sub Pic1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Pic1.MouseUp

        If e.Button = Windows.Forms.MouseButtons.Left Then

        Dim p As Point = PointToScreen(PtStart) : p.Offset(Pic1.Location)

        ControlPaint.DrawReversibleFrame(New Rectangle(p.X, p.Y, pt.X - p.X, pt.Y - p.Y), Color.Red, FrameStyle.Dashed)

        Call DrawRect(PtStart, New Point(e.X, e.Y))

        pt = Nothing

        End If

        End Sub

       End Class

SortableJS原理分析(源码)

       前言

       SortableJS是基于H5拖拽API实现的一个轻量级JS拖拽排序库,它适用于以下一些场景:

       容器项目拖动排序:容器列表内的源码源码子项目,通过拖动进行位置调换,鼠标鼠标设置且具有动画效果;

       容器间的拖动拖动vc键盘键码源码项目移动:将一个容器列表中的子项目,拖动到另一个容器列表中(移动/克隆)。源码源码

       不论是容器内元素顺序排序,或是两个容器内的元素进行移动,本质上是在通过操作DOM来实现。

       下面我们先熟悉一下SortableJS基本使用。

示例

       1、HTML结构:

<divclass="row"><divid="leftContainer"class="list-groupcol-6"><divclass="list-group-item">Item1</div><divclass="list-group-item">Item2</div><divclass="list-group-item">Item3</div><divclass="list-group-item">Item4</div><divclass="list-group-item">Item5</div><divclass="list-group-item">Item6</div></div><divid="rightContainer"class="list-groupcol-6"><divclass="list-group-itemtinted">Item1</div><divclass="list-group-itemtinted">Item2</div><divclass="list-group-itemtinted">Item3</div><divclass="list-group-itemtinted">Item4</div><divclass="list-group-itemtinted">Item5</div><divclass="list-group-itemtinted">Item6</div></div></div>

       2、为容器实例化:

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});

       现在,就可以在容器内进行排序拖动,或者拖动左侧容器元素,添加到右侧容器中。

思路分析

       在看源码之前,还是趋势划线线源码需要对H5拖拽用法有一定了解,如果不熟悉,直接去看源码很容易就放弃。

       若你对H5拖拽API比较熟悉,就可以根据SortableJS的视图呈现效果,想出个大概思路。

       拖拽,首先要搞清楚两个词汇对象:

       拖动元素:作为拖拽元素被拖起(下文叫dragEl);

       目标元素:作为拖拽元素即将被放置时的参照物(下文叫target);

       在SortableJS中,拖拽离不开以下几个事件:

       dragstart:作为拖拽元素,按下鼠标开始拖动元素时触发(拖拽周期只触发一次);

       dragend:作为拖拽元素,当鼠标松开拖放元素时触发(拖拽周期只触发一次);

       dragover:作为拖拽元素,当拖动元素进行移动,会持续触发,需要在这里取消默认事件,h牛牛源码出售否则元素无法被拖动(松开时元素的预览幽灵图又回去了);

       drop:作为目标元素,当鼠标松开拖放元素时触发(拖拽周期只触发一次);

       下面我们一起去分析SortableJS具体实现。

源码实例构造函数

       从上面的示例使用上得知,SortableJS是一个构造函数,接收容器元素和配置项:

constexpando='Sortable'+(newDate).getTime();functionSortable(el,options){ this.el=el;//rootelementthis.options=options=Object.assign({ },options);el[expando]=this;constdefaults={ group:null,sort:true,//默认容器可以排序animation:0,removeCloneOnHide:true,//将一个容器元素拖动至另一个容器后,默认setData:function(dataTransfer,dragEl){ dataTransfer.setData('Text',dragEl.textContent);}};//参数合并for(varnameindefaults){ !(nameinoptions)&&(options[name]=defaults[name]);}//规范group_prepareGroup(options);//绑定原型方法为私有方法for(varfninthis){ if(fn.charAt(0)==='_'&&typeofthis[fn]==='function'){ this[fn]=this[fn].bind(this);}}//绑定指针触摸事件,类似mousedownon(el,'pointerdown',this._prepareDragStart);on(el,'dragover',this);on(el,'dragenter',this);}

       初始化示例做了以下几件事件:

       将传入的参数与提供的默认参数进行合并;

       规范传入的group格式;

       将原型上的方法绑定在实例对象上,便于使用;

       绑定pointerdown、dragover、dragenter事件,其中pointerdown可以看作是dragstart事件,做了一些拖拽前的准备工作。

       group用于两个容器元素的glasses.com 源码相互拖拽场景,规范group核心代码如下:

function_prepareGroup(options){ functiontoFn(value,pull){ returnfunction(to,from){ letsameGroup=to.options.group.name&&from.options.group.name&&to.options.group.name===from.options.group.name;if(value==null&&(pull||sameGroup)){ returntrue;}elseif(value==null||value===false){ returnfalse;}elseif(pull&&value==='clone'){ returnvalue;}else{ returnvalue===true;}};}letgroup={ };letoriginalGroup=options.group;if(!originalGroup||typeoforiginalGroup!='object'){ originalGroup={ name:originalGroup};}group.name=originalGroup.name;group.checkPull=toFn(originalGroup.pull,true);group.checkPut=toFn(originalGroup.put);options.group=group;}_prepareDragStart拖动前的准备工作

       当鼠标按下触发pointerdown事件时,会保存拖动元素的信息,提供后续使用,并且注册dragstart事件:

letoldIndex,newIndex;letdragEl=null;//拖拽元素letrootEl=null;//容器元素letparentEl=null;//拖拽元素的父节点letnextEl=null;//拖拽元素下一个元素letactiveGroup=null;//options.groupSortable.prototype={ _prepareDragStart(evt){ lettarget=evt.target,el=this.el,options=this.options;oldIndex=index(target);rootEl=el;dragEl=target;parentEl=dragEl.parentNode;nextEl=dragEl.nextSibling;activeGroup=options.group;dragEl.draggable=true;//设置元素拖拽属性on(dragEl,'dragend',this);on(rootEl,'dragstart',this._onDragStart);on(document,'mouseup',this._onDrop);},}

       on就是addEventListener,index方法用于获取元素在父容器内的索引:

functionon(el,event,fn){ el.addEventListener(event,fn);}functionoff(el,event,fn){ el.removeEventListener(event,fn);}functionindex(el){ if(!el||!el.parentNode)return-1;letindex=0;//返回元素节点之前的兄弟元素节点(不包括文本节点、注释节点)while(el=el.previousElementSibling){ if(el!==Sortable.clone)index++;}returnindex;}

       _onDragStart用于处理dragstart事件逻辑,_onDrop用于处理拖拽结束逻辑,比如这里执行了dragEl.draggable=true;,那么在mouseup鼠标松开后需将draggable=false。

       这里有趣的一点是dragend事件,它的处理函数绑定的是this即Sortable实例本身,我们都知道实例对象是一个对象,怎么能作为函数使用呢?

       其实addEventListener第二参数可以是函数,也可以是对象,当为对象时,需要提有一个handleEvent方法来处理事件:

Sortable.prototype={ handleEvent:function(evt){ switch(evt.type){ case'dragend':this._onDrop(evt);break;case'dragover':evt.stopPropagation();evt.preventDefault();break;case'dragenter':if(dragEl){ this._onDragOver(evt);}break;}},}

       到这里,整个拖拽流程功能函数都暴露在了眼前:

       _onDragStart处理dragstart拖拽开始工作;

       _onDragOver处理拖拽移动到别的元素时工作;

       _onDrop处理鼠标拖动结束的收尾工作。

dragstart

       这里做了两件事情:

       clone一个dragEl元素副本,用于两个容器项目移动时使用;

       触发外部传入的clone和dragstart事件;

letcloneEl=null,cloneHidden=null;//clone元素_onDragStart(evt){ letdataTransfer=evt.dataTransfer;letoptions=this.options;cloneEl=clone(dragEl);cloneEl.removeAttribute("id");cloneEl.draggable=false;//设置拖拽数据if(dataTransfer){ dataTransfer.effectAllowed='move';options.setData&&options.setData.call(this,dataTransfer,dragEl);}Sortable.active=this;Sortable.clone=cloneEl;_dispatchEvent({ sortable:this,name:'clone'});_dispatchEvent({ sortable:this,name:'start',originalEvent:evt});},functionclone(el){ returnel.cloneNode(true);}

       _dispatchEvent会通过newwindow.CustomEvent构造一个事件对象,将拖拽元素的信息添加到自定义事件对象上,传递给外部的注册事件函数,大体代码如下:

functiondispatchEvent(...params){ //sortable没有传,就根据rootEl获取sortable。sortable=(sortable||(rootEl&&rootEl[expando]));if(!sortable)return;letevt,options=sortable.options,onName='on'+name.charAt(0).toUpperCase()+name.substr(1);//自定义事件,拿到事件对象,满足外部用户传入的事件正常使用if(window.CustomEvent){ evt=newCustomEvent(name,{ bubbles:true,cancelable:true});}else{ evt=document.createEvent('Event');evt.initEvent(name,true,true);}evt.to=toEl||rootEl;evt.from=fromEl||rootEl;evt.item=targetEl||rootEl;evt.clone=cloneEl;evt.oldIndex=oldIndex;evt.newIndex=newIndex;//执行外部传入的事件if(options[onName]){ options[onName].call(sortable,evt);}}

       可见,拖拽的核心逻辑不在dragstart中,下面我们去看dragenter的处理函数_onDragOver。

dragenter

       SortableJS的核心逻辑在_onDragOver中,拿容器内项目排序为例:当拖动dragEl元素,移动到另一个元素上时,会发生两者的位置交换,可见,Sort的逻辑在这里。

       首先,在实例化对象时绑定了dragover和dragenter事件,并且通过handleEvent将事件逻辑交由_onDragOver来处理:

on(el,'dragover',this);on(el,'dragenter',this);handleEvent:function(evt){ switch(evt.type){ case'dragover':evt.stopPropagation();evt.preventDefault();break;case'dragenter':if(dragEl){ this._onDragOver(evt);}break;}},

       在_onDragOver中,需要注意一点是:假如有两个容器,那就有两个newSortable实例对象,isOwner将为false,这是就需要判断拖动容器的activeGroup.pull(是否允许被移动)和group.put(是否允许添加拖动过来的元素)。

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});0

       上面的核心在于下面这一行代码:

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});1

       如果拖拽元素的位置小于目标元素的位置,说明是从上往下拖动,那么将dragEl移动到target.nextSibling之前;

       如果拖拽元素的位置大于目标元素的位置,说明是从下往上拖动,那么只需将dragEl移动到target之前即可;

       整个移动过程均采用DOM操作insertBefore来实现。

       另外如果是两个容器的场景(isOwner=false),并且拖动元素的容器activeGroup.pull=clone,需要将dragstart创建的clone元素渲染到容器中:

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});2drop

       drop主要做一些收尾工作,如将dragEl.draggable=false,移除绑定的mouseup、dragstart、dragend事件,触发用户传入的sort、end事件等。

       不过注意,虽然起名叫drop,触发的事件确是dragend。

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});3动画

       如果想在拖动排序中有一定的animation动画效果,可以配置动画属性,属性值是动画持续时长:

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});4

       动画的时机也是在dragenter中,大致的思路如下:

       1、记录:记录容器子项位置信息

       在操作DOM移动dragEl之前,记录容器内所有子项的位置;

       进行DOM操作进行位置交换,DOM操作本身没有动画;

       这时再去记录一次移动后的容器内所有子项的位置;

       2、执行:有了上面几步的操作,接下来就可以根据移动前后的位置进行动画操作

       通过translate先让元素立刻回到移动前的位置;

       此时给元素自身设置过度效果transform;

       这时候就可以通过translate让元素回到移动之后的位置。

       大致实现如下:

newSortable(leftContainer,{ group:{ name:'group',pull:'clone',put:true},});newSortable(rightContainer,{ group:'group',});5最后

       本文以探索SortableJS拖拽思路为主线,去了解业界开源拖拽库的设计与思路。感谢阅读。

原文:/post/

java中的一段,谁能读懂?Component干什么用的

       我大概给你写个注释

       public void mouseDragged(MouseEvent e) //从这个方法名上看可能是鼠标拖动的方法

       {

        Component com=null; //Component 应该是java.awt.Component,它是很多awt组件 的父类型

        if(e.getSource() instanceof Component) // 如果鼠标事件 e的发生源是Component(或它的子类)

        {

        com=(Component)e.getSource(); //将变量com赋值为 鼠标事件的发生源

        if(com!=this) //如果得到的com变量不是这个类的实例本身(也说明了这个方法所在的类也是一个Component)

        move=true; //将标志变量move设为true

        e=SwingUtilities.convertMouseEvent(com,e,this); //将鼠标事件转化一下

        if(move) //如果标志变量move是true

        {

        x=e.getX(); //得到这个鼠标事件相对于产生它的组件的X坐标

        y=e.getY(); //跟上面一样

        int w=com.getSize().width, //得到com组件的宽度(注意com组件就是产生e的组件)

        h=com.getSize().height;

        com.setLocation(x-w/2,y-h/2); //将com组件移到新的位置(这个位置有什么意义我还是搞不清楚)

        }

        }