挑战VB：第一题价值1毛，第二题价值4毛，加起来58分！非高手莫进！

问题2你考虑的方法不对，没有抓鼠标的方法，但是可以实现，方法是：取得鼠标的位置。用GetCursorPos函数。(x,y)是HotSpot位置。xHotSpot和yHotSpot是位移。调用GetIconInfo API函数。然后叠加抓的图片。
Picture1.PaintPicture pic,x-xHotSpot,y-yHotSpot 
抓桌面图片的简单的源码：
ME.Hide
DoEvents
picCopy.Width=Screen.Width
picCopy.Height=Screen.Height
picCopy.AutoRedraw=True
hDC=GetDC(0)
sx=Screen.Width\Screen.TwipsPerPixelX
sy=Screen.Height\Screen.TwipsPerPixelY
BitBlt picCopy.hDC,0,0,sx,sy,hDC,0,0,vbSrcCopy
ReleaseDC 0,hDC
picCopy.AutoRedraw=False

解决方案 »

  1.   

    忘记说了，上面的2段代码都是单独的，你自己改一下PIC控件名字然后合并到一起就可以了。
      

  2.   

    大家加油啊！分不够，可以再加100分！
    在下E-Mail:   [email protected]
    愿和大家交个朋友！
    谢谢各位捧场！
      

  3.   

    tianye(田野)　说了，没有抓鼠标的方法，就是取得位置再加上去的
      

  4.   

    很明显，鼠标不是Device context对象，所以抓取的时候无法抓取鼠标
      

  5.   

    问题一可以先把图片读到一个baty数组，然后用senddata传输数组
      

  6.   

    问题一是比较好解决的,我已经利用byte实现,只是效率 不高,后用压缩算法和多线程改良了.
    第二题,我已经获得了一个抓图控件解决了一部分,问题是:
    如何完整抓取游戏\AVI\MPEG中的画面??
    高手请回答!!
    小弟先鞠躬了!
      

  7.   

    如果你不嫌慢可以用读取像素点的方法把PICTURE控件中的图片发出去可以先发送图片大小的数据，然后再发送每个像素点的RGB值第二个问题前面的老兄好象已经给你解决了
      

  8.   

    用程序按下“print screen ”，然后，copy 剪贴板 如何
      

  9.   

    to:chenxiang_2001(皮皮)　
    where is the Mouse??
      

  10.   

    使用bitblt复制屏幕是遇到游戏，mpeg画面时抓下来的只能是黑屏。如果想的话只能用DirectX编程。不过以前玩游戏是发现一个现象，如果把WINDOWS的硬件图形加速关闭或者降低后使用bitblt就可以了。不知是不是与驱动有关。
      

  11.   

    VC版有在DirectX下抓屏的讨论帖子，去查查吧
      

  12.   

    Is it really difficult?
      

  13.   

    VB不能做的话,就用VC来做,让后用VB来调用好了.
      

  14.   

    我有源码，不过你的分太少了。
    [email protected]
      

  15.   

    很简单啊！就是象PCAnyWhere一样的功能呀！下面这个站点有这样的源程序下载：http://www.21code.com/codebase/?pos=down&id=811