VPF::Работа с bmp форматом - Форум программистов

Ak47black

Дата 26.10.2006, 19:12 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

У меня следушая проблемма, как правильно получить данные пикселей
Использую следуший код

Код


procedure ReadBMP(FileName: String);
type
  
  TBitmapContent = packed record
    Identifier: array[0..1] of Char;
    FileSize: DWORD;
    Reserved1: Word;
    Reserved2: Word;
    BitmapDataOffset: DWORD;
    BitmapHeaderSize: DWORD;
    Width: DWORD;
    Height: DWORD;
    Planes: Word;
    BitsPerPixel: Word;
    Compression: DWORD;
    BitmapDataSize: DWORD;
    HResolution: DWORD;
    VResolution: DWORD;
    Colors: DWORD;
    ImportantColors: DWORD;
  end;
      
var
  BitmapContent: TBitmapContent;
  BitmapData: TBitmapData;
  Steam: TFileStream;
begin
  Steam:= TFileStream.Create(FileName,fmOpenRead);
  Steam.Seek(0, soFromBeginning);
  Steam.Read(BitmapContent, sizeof(BitmapContent));
end;

Хочю получить массив пикселей изображения.
Как правильней дальше мне делать что-бы осушествить считывание пикселей, учитывая то что после каждой строки идет в этом формате идут 0000.

Albinos_x

Дата 26.10.2006, 19:42 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 1
Всего: 108

http://forum.vingrad.ru/topic-94227/index.html

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Звук, графика и видео \| Следующая тема »