Работа с Bmp

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

oif
Сообщения: 42
Зарегистрирован: 09 ноя 2006, 21:03

Всем спасибо разобрался.
Аватара пользователя
somewhere
Сообщения: 1858
Зарегистрирован: 31 авг 2006, 17:14
Откуда: 71 RUS
Контактная информация:

&quot писал(а):У меня получаются через canvas.pixels тысячи.
Canvas.Pixels - дает Pointer на память, в ней каждый байт - градация серого.

Код: Выделить всё

Var P:PByteArray;
-=Bla=--=Bla=--=Bla=
P := YourBitmap.Canvas.Pixels[row];
GrayPixel1 := P[0];
GrayPixel2 := P[1];
-=Bla=--=Bla=--=Bla=-
It's a long way to the top if you wanna rock'n'roll
Аватара пользователя
Duncon
Сообщения: 2085
Зарегистрирован: 10 окт 2004, 14:11
Откуда: Питер
Контактная информация:

oif писал(а):Всем спасибо разобрался.
Покажи решение интересно что получилось..
Ответить