关于取色?-------------请教为何无法取得屏幕外的坐标颜色?

为何无法取得屏幕外的坐标颜色?
大虾有空请帮看看...谢了procedure TCovColorForm.FormMouseDown(Sender: TObject;Button: TMouseButton; 
Shift: TShiftState; X, Y: Integer);
var
    t:tcolor;
    DeskCanvas   :   TCanvas;
    CurrentPos   :   TPoint;
begin
    //当点击左键时取得颜色
    if (ssLeft in Shift) then
    begin
        GetCursorPos(CurrentPos);
        DeskCanvas   :=   TCanvas.Create;
        DeskCanvas.Handle   :=   GetDC(0);
        ScrollBox1.Color:=DeskCanvas.Pixels[CurrentPos.X,CurrentPos.Y];
        DeskCanvas.Free;
    end;
end;