//在OnMouseDown事件里加入下列代码试试
var
hWnd: THandle;
WndDC: HDC;
PixelColor: TColor;
begin
hWnd := WindowFromPoint(Point(X, Y));
WndDC := GetWindowDC(hWnd);
PixelColor := GetPixel(WndDC, X, Y);
end;
var
hWnd: THandle;
WndDC: HDC;
PixelColor: TColor;
begin
hWnd := WindowFromPoint(Point(X, Y));
WndDC := GetWindowDC(hWnd);
PixelColor := GetPixel(WndDC, X, Y);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货