Delphi,OpenGL,чтение пикселя.

[Victor1963]

Есть команда
glReadPixels(round(ClientWidth / 2), round(ClientHeight / 2), 50, 50,
GL_RGB, GL_UNSIGNED_BYTE, @Pixel);,
которое считывает в память площадью 50*50 пикселей. как мне переделать, что бы команда считала по пикселю и определяла цвет.
В DTLPHI это c:=Canvas.Pixels[x,y];
if c=clBlack then
begin
....
end;