Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.17;
Скачать: CL | DM;

Вниз

scanline   Найти похожие ветки 

 
3d[Power] ©   (2002-01-07 03:17) [0]

Можете подробно объяснить основные принципы работы со Picture.Bitmap.scanline и с пикселями вообще


 
Donal_Graeme   (2002-02-04 05:42) [1]

хм..на подробность не претендую, но :
scanline имеет тип PByteArray, если я правильно помню.
соответственно, когда пишешь Bitmap.scanline[x] (где x - номер строчки) получаешь массив, содержащий информацию о цветах точек в заданной линии сканирования. данные в этом массиве зависят от типа битмапа. если битмап имеет глубину цвета 8 бит, то в массиве идут байты адреса цвета в палитре, если глубина 16 бит, то на каждый цвет уходит 2 байта и это уже реальный цвет в формате RRRRRGGG|GGGBBBBB (порядок следования байт я не помню, но это нетрудно установить экспериментально), при глубине в 24 бита цвета в массиве идут тройками B(8)G(8)R(8), т.е. сперва идёт байт синей составляющей, потом зелёной а затем красной; при 32 битной глубине, соответственно, на цвет уходит 4 байта, из которых первый - это альфа составляющая, потом цвет, как в 24-битном битмапе.
теперь небольшой примерчик :-)


function GetRColor (Bmp: TBitmap; x, y: LongInt): Byte;
var ScanLine : PByteArray;
begin
SL := Bmp.Scanline[y];
case Bmp.pixelformat of
pf24bit: Result := SL[x*3 +2];
pf32bit: Result := SL[x*4 +3];
else Result := 0;
end;
end;


надеюсь, это поможет :-)



Страницы: 1 вся ветка

Текущий архив: 2002.06.17;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
3-55035
Ziplex
2002-05-24 11:09
2002.06.17
где можно взять компонент Fast Report


4-55347
AlexanderSK
2002-04-11 17:17
2002.06.17
Handle Dll


14-55282
Из Санкт-Петербурга
2002-05-15 08:20
2002.06.17
Кто знает, сколько у нас в городе стоит Nokia 3410, и где купить?


3-54969
Gamar
2002-05-14 14:56
2002.06.17
Запуск приложения баз данных Парадокс без Дельфи


14-55303
lak_b
2002-05-16 00:01
2002.06.17
сон и мы