Как определить цвет произвольной точки на экране?

Следующая статья: Как определить лежит ли точка внутри полигона?

Вариант 1 определения цвета точки на экране

var DC: HDC;
color:Cardinal;
begin
  DC:=CreateDC('MONITOR',nil,nil,nil);
  color:=GetPixel(DC,300,300);
  DeleteDC(DC);
end;

Вариант 2 определения цвета точки на экране

var DC: HDC;
color:Cardinal;
begin
  DC:=GetDC(0);
  color:=GetPixel(DC,300,300);
  ReleaseDC(0,DC);
end;