请教一个抓图的问题(50分)

我想做一个抓图程序，要抓活动窗口，我试了很多方法，都没有成功，代码如下，请高手帮我看看

Self.Hide; //如果去了一句可以抓到自己，但是我想抓的是本窗口下的第一个窗口
Sleep(50);
h := GetActiveWindow;
c := TCanvas.Create;
try
GetWindowRect(h, r);
c.Handle := GetWindowDC(h); //没有释放
imgCapture.Width := r.Right - r.Left;
imgCapture.Height := c.ClipRect.Bottom - c.ClipRect.Top;
BitBlt(imgCapture.Canvas.Handle, 0, 0, imgCapture.Width, imgCapture.Height, c.Handle, 0, 0, SRCCOPY);
finally
c.Free;
Self.Show;
end;

用热键激活伢

不成功的现象是？。。。。

to 不不
我有源吗，我发给你
留下你的qq和mail

给我也发一份吧.xiaoxueer@371.net

我也要，谢谢。。 flyso@163.com