Как из 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^

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

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

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