Читал эту тему, без описания модулей трудно понять.
Возможна реализация на Дельфи.

var pic:TBitmap;
begin
pic:=TBitMap.Create;
pic.LoadFromFile('имя_файла_с_картинкой');
mas[x,y]:=pic.Canvas.Pixels[x,y];
end;
GetPixel(x, y: Integer): Word; // вернет цвет
pic:=TBitMap.Create;
pic.LoadFromFile(Fname);
Color:=pic.Canvas.Pixels[1,1];
Edit1.Text:=
inttohex(GetRValue(Color),2) +
inttohex(GetGValue(Color),2) +
inttohex(GetBValue(Color),2) ;
...
myColor:=pic.Canvas.Pixels[1,1];
Edit1.Text:=
inttohex(GetRValue(myColor),2) +
inttohex(GetGValue(myColor),2) +
inttohex(GetBValue(myColor),2) ;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
FName := OpenPictureDialog1.FileName;
Image1.Picture.LoadFromFile(FName);
end;
end;