Re: Работа с Bmp
Добавлено: 11 апр 2007, 11:09
Всем спасибо разобрался.
Canvas.Pixels - дает Pointer на память, в ней каждый байт - градация серого." писал(а):У меня получаются через canvas.pixels тысячи.
Код: Выделить всё
Var P:PByteArray;
-=Bla=--=Bla=--=Bla=
P := YourBitmap.Canvas.Pixels[row];
GrayPixel1 := P[0];
GrayPixel2 := P[1];
-=Bla=--=Bla=--=Bla=-