Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.017 c
1-93540
Zeon
2004-01-16 21:44
2004.01.29
Событийные процедуры.


1-93558
Lony
2004-01-17 14:00
2004.01.29
Папку в Exe


1-93534
Graff
2004-01-18 00:42
2004.01.29
Определить имя компонента по его индексу.


9-93320
Vitas2
2003-07-16 09:46
2004.01.29
glBlendFunc


1-93479
ikivio
2004-01-15 00:39
2004.01.29
Error opening file: “….. DebugUn.dfm”