Delphi如何判断图片为纯黑色（接近黑色），如题，是否能提供关键代码？
接近黑色，也就是用GetPixel得到的像素颜色值的三个分量，R、G、B都很小，接近0。或者就是0。你可以用 RGB 的平均值作为亮度的近似值，所有像素的平均亮度越低，那么图片越黑。
判断规则呢 如果是纯黑背景中有一个 1像素的白点 算是什么
转成灰度图，设置2个阙值：第一个用于判定灰度低于多少为黑色；第二个用于判定整幅图有百分之多少的像素满足第一个条件，判断整个图片为黑色（接近黑色）