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

Вниз

Как из TBitmap вытащить plain data   Найти похожие ветки 

← →
Дмитрий В. Белькевич ©   (2003-09-03 17:48) [0]

Как из TBitmap вытащить plain data - без всяких заголовков и сохранить данные в файл? Scanline?

---

← →
Skier ©   (2003-09-03 17:49) [1]

> Scanline?

Угу. В Help пример есть.

---

← →
Дмитрий В. Белькевич ©   (2003-09-03 17:52) [2]

Thx.

---

← →
Дмитрий В. Белькевич ©   (2003-09-03 21:47) [3]

Сделал со scanline:

Bitmap.LoadFromFile(FileName);
Bitmap.PixelFormat := pf24bit;
for i := 0 to BitMap.Height - 1 do
begin
P := BitMap.ScanLine[i];
BlockWrite(fp, p, Bitmap.Width * 3);
end;

Сохраняет какую-то фигню вместо bmpшки.

---

← →
MBo ©   (2003-09-04 07:48) [4]

Короче будет без ScanLine- GetDiBits (предварительно правильно заполнить BitmapInfo) или GetBitmapBits

А у тебя в BlockWrite нужно p^

---

← →
MBo ©   (2003-09-04 07:55) [5]

Ну, может, и не короче, но быстрее ;)

---

← →
Дмитрий В. Белькевич ©   (2003-09-25 02:48) [6]

Решил просто кусок от файла bmp загружать в память. Т.к. размер plain data известен, то отнял от конца файла размер data, и гружу с этого места. Пока работает.

---

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

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

Наверх

Память: 0.48 MB
Время: 0.018 c