标签:blog ar color os for div log html as
1.通过API函数GetPixel(),获取某个点的颜色值;
var
PT : TPoint;
C : TColor;
DC : HDC;
begin
GetCursorPos(PT);
DC := GetDC(0);
C := GetPixel(DC,PT.x,PT.y);
self.color := c; //设置窗体颜色
edit1.text := FORMAT($%.6x,[C]);
end;
获取的TColor颜色值为BGR格式($F6E6E1),和网页html的RGB格式相反,如要和delphi颜色效果相同,设置为#E1E6F6;
标签:blog ar color os for div log html as
原文地址:http://www.cnblogs.com/delphiclub/p/4168206.html