Функция GetPixel

Модуль Graph

Возвращает значение пиксела в точке (X, Y).

Объявление:

 Function GetPixel(X, Y : Integer) : Word;

Режим:

Замечания:
Возвращает цвет пиксела в точке (X, Y). Нужно быть в графическом режиме.

Пример:

 Uses Graph;
 
 Var  Gd, Gm : Integer;
  PixelColor : Word;
 
 Begin
  Gd:=Detect;
  InitGraph(Gd, Gm, '');
  If GraphResult <> grOk Then Halt(1);
  PixelColor:=GetPixel(10, 10);
  If PixelColor = 0 Then PutPixel(10, 10, GetMaxColor);
  ReadLn;
  CloseGraph;
 End.

См. также:

Авторизация

Функция GetPixel