2008年12月24日
取屏幕点的颜色值
摘要： var Str: TPoint; BarHand: THandle; begin GetCursorPos(Str); BarHand := GetDC(0); Panel1.Color := GetPixel(BarHand, Str.X, Str.Y); Caption := IntToStr(Panel1.Color); 阅读全文
posted @ 2008-12-24 18:11 谭志宇 阅读(156) 评论(0) 推荐(0) 编辑