顶,ccrun(老妖)快来啊

1取色:
GetDC(0)的到屏幕的设备描述表,GetCursorPos得到鼠标的位置,GetPixel得到鼠标位置处的颜色.
2把图像放到小区域:
可以用VCL函数:CopyRect,如果想缩放,可以用API StretchBlt.

我来了。给你贴代码现在。

在Form上添加一个Panel和一个Timer，然后添加以下代码：
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    Timer1->Interval = 300;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    // 在MiniSpy中我设定的最大放大倍数是4，所以取值为0~3
    // 这只是个简单例子，在Minispy中我是在鼠标按下并
    // 移动的过程中取景并放大的，在这个例子里是利用Timer来取
    // 可能会占资源较重。可以根据需要自己改一下。
    // 实现的过程主要是用了StretchBlt
    int nZoom = 0;
    POINT pt;
    GetCursorPos(&pt);
    HDC hdcSrc = GetDC(GetDesktopWindow());
    HDC hdcDst = GetDC(Panel1->Handle);
    StretchBlt(hdcDst,
            16 * (nZoom) + 1, 16 * (nZoom) + 1,
            32 * (4 - nZoom) + 1, 32 * (4 - nZoom) + 1,
            hdcSrc,
            pt.x - 16, pt.y - 16,
            33, 33,
            SRCCOPY);
}
//---------------------------------------------------------------------------

你去邮箱收吧,那是我写的一个小程序,只是设置放大倍数为两倍,你改一下就可以了.

up

简单 —— 老妖的代码就够了

本来想模拟老妖的 minisky 写一个mininisky 

    ---- 结果
      —— 工程太重，忙得晕头转向，所以一直挂着没动身写下去

老妖不要告我侵权就可以了，写好了就借你网站 发布出去 ^&^

谢谢各位!

对于ccrun 和 constantine 两位大哥的帮忙万分感谢!
本来说好给ccrun大哥 100分的.现在constantine大哥又给了我个例子,
因此,每人先给50分.还有50 我再开贴补上.

忘记说明,我是帮我舍友给的,他的分快没有了.
同时我也很感谢两位大哥帮忙,这样我们的工程就可以继续了.