关于“拖拉时显示窗口内容”

Question

本帖最后由 hpygzhx520 于 2009-12-07 10:33:10 编辑

Answer 1

用api把这个钩去掉是否违规？

Answer 2

不知道 Hook消息处理 行不。

Answer 3

lz误会了，我不是说 发到哪个板块 有问题，是指用SystemParametersInfo这个api函数可以设置你说的那个钩钩（电脑属性->高级->设置->视觉效果中"中取消"拖拉时显示窗口内容"这个选项之后（就是不打钩）），这样是否符合lz的要求。

Answer 4

在拖动之前，先把欲拖动方向抓屏，拖动使窗口拉伸时，在RESIZE事件中根据是否拖拽完成的标识决定是否重新定位，并将多出的窗口部分拷贝成该部分对应的图像。当拖拽完成，再进行控件的重定位。

Answer 5

http://topic.csdn.net/u/20091202/13/66015bdf-6b87-4268-8e9d-dccf45f7ae52.html#replyachor看老马回复的代码Dim mX As Long, mY As Long
  
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button And vbLeftButton Then
        mX = X: mY = Y
    End If
End Sub
  
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button And vbLeftButton Then
        Me.Move Me.Left - mX + X, Me.Top - mY + Y
    End If
End Sub

Answer 6

老马不是这个意思吧？老马是整的一个窗体随鼠标移动，跟LZ的问题有出入。
我觉得画一个虚框比较难做吧，不知道vb.net里有没有简单的方法~~窗体还原好容易一点。

Answer 7

貌似在什么地方看到过类似的问题，要使用API

Answer 8

这个..........好说啊,技术简单,代码烦人,要写一堆......简单来说,就是锁定窗体大小,不让更改,这样系统的实时重绘就无效了;然后子类化拦截鼠标按下与抬起消息,再在这个过程中用DrawMutiRect自绘虚线框.............效果是一样的啦~~~~~~嘿嘿.本来这个代码我是上传到我站上的,但现在被伟大的GOV因为我是个人网站而封了IP,现在只有我发给你了......留个MAIL吧.应该有些朋友是看过这代码的,叫"完美自定义窗体".我将在心中深深地,永久地BS封我站的垃圾.网络文字狱啊!!!!!!!!!!!!!!!!

Answer 9

    SystemParametersInfo SPI_SETDRAGFULLWINDOWS, False, 0, 0

Answer 10

    SystemParametersInfo SPI_SETDRAGFULLWINDOWS, False, 0, 0

Answer 11

嘿嘿，老马，你的代码可不可以发给我看一下啊？
[email protected]

Answer 12

[email protected]已发,请查收.不过.........今天下午,我的站已经开通了-_-b封IP的原因是,我站所在服务器因为有一个WAP站点,所以整台服务器被封80端口.伟大的GOV啊伟大的GOV!!!!!!!!!!!!!!!!!!!!!!你实在是太伟大了!!!!!!!!!!!!!!!!!!!!!!