|
我想,不论系统设置是怎样的,拖动我的窗体时都是第二种情况,不知道在什么地方调用这个函数,请教? |
|
|
|
我想問如果有二個窗體﹐怎么用鼠標拖動窗體一時候﹐窗體二也可以動。
|
|
|
我想可以设置一个布尔型数据,当点窗体后为true,然后捕捉鼠标轨迹,让窗体进行移动,当再次点击窗体后结束跟踪,不在移动
|
|
|
不要告訴我用timer,因為偶的內存才32
|
|
|
我想問如果有二個窗體﹐怎么用鼠標拖動窗體一時候﹐窗體二也可以動。
这个问题比较好的解决方法是拦截wm_moving,wm_move,然后移动需要跟随的窗体,就可以了,我写过的。楼上说的对,用timer控件当然不好了,浪费资源且不精确 |
|
|
嘿嘿!俺谢了一个播放器,就是这样滴!!!
|
|
|
搂住要不要俺给你一个类啊!这个类可以,满足你哦!!!:)
|
|
|
关注
|
|
|
搂住要不要俺给你一个类啊!这个类可以,满足你哦!!!:)
-------------------------------------------------------------------------------- 当然需要,谢了 qdlqdl@163.com |
|
|
没这么复杂,而且不用API就可以,只是想要有虚线框会比较麻烦
dim mx , my as single sub form_mousedown() mx=x my=y end sub sub form_mousemove() if button=1 then me.left=me.left+(mx-x) me.top=me.top+(my-y) '上边两行的加减我记不清了,大概是这样子 '想要form2动就把代码加在这里 end if end sub 记得大概是这个样子,去网上看看好象有代码的 |
|
|
谢楼上的,我知道你说的方法,不过不想用,就想用个api直接了当
|
|